Hello yet again!
I am trying to move several sheets to the end of a separate workbook. I have the code working like this:
I tried recording a macro and selcting (Move to end) in the list box when you move sheets to another workbook manually. The code looks like this:
In this case the workbook I moved to only contained 3 sheets. So I tried this with my code:
Sheets(Array("Sheet1", "Sheet2")).Move Before:=Workbooks("Book1").Sheets(4)
But, a error msg is produced "Subscript Out of Range".
ActiveSheet.Move Before:=wb2copyTo.Sheets(wb2copyTo.Sheets.Count + 1)
Thus I have come to you guys... any advice? I need to be able to move to the end and it is not always the same number of sheets in the workbook I am moving to. I also tried using After:= but Excel doesn't recognize that. Thanks a bunch in advance!!