Move sheet

[VegasNath]

I am using code like:

Code: Select all

wb1.Sheets(Format(strDateWork, "dd")).Copy Before:=wb2.Sheets("End")

This works fine if "End" is visible but not if it is hidden. Any idea how I can overcome this?

[HansV]

If a sheet is hidden, it is not clear what "Before" would mean - "Before" refers to the visual order of the sheets.
So you'll have to specify a visible (non-hidden) sheet instead of End.
Or make End visible, move the other sheet, then hide End again.

[VegasNath]

Or make End visible, move the other sheet, then hide End again.

Easy enough I guess, Thanks Hans. I would want to hide both end and the moved sheet, could that be done with a single statement, or separately?

[HansV]

You can use

Worksheets(Array(strDateWork,"End")).Visible = xlSheetHidden

Note that the first array element doesn't have quotes around it, since it is the name of a variable.

[VegasNath]