Question about Select Case

[Crispy85]

Hi,

Im using this script:

Please Login or Register  to view this content.

This is only Level 200 but i have some more levels in this script.
I want the script to unhide a sheet (which in this case is also called "Level 200"), copy a range and paste it back in the first sheet.
However it copies the range in the first sheet. So it copies Sheet1 Range(Range("B200").End(xlUp), "H2").Select.

Can anyone see if there is something wrong with this script?

Thanks!

[Norie]

You don't appear to be copying anywhere in the posted code.

[Crispy85]

You're right!
I changed the original post.
I had Copy changed with Select to see if it correctly selects the range but it selects the range in Sheet1.

So, why doesn't it select the range in sheet Level 200?

[Norie]

Whenever you are working with code in a worksheet module that refers to other worksheets you should explicitly refer to the other worksheets in the code, don't rely on using ActiveSheet/Select/Selection etc.

I couldn't quite follow all the posted code, not sure where you are deleting cells from, but try this.

Please Login or Register  to view this content.

Note, I've commented out the parts of code showing/hiding the sheet as you shouldn't need a sheet to be visible to copy from it.

[Crispy85]

Yes thanks Norie!
This works.

I put the visible = true before the With so that works now.
Thanks for your clarification