XL97: Cannot Move or Copy Sheet After Last SheetID: Q143458
|
When you run a Microsoft Visual Basic for Applications macro that copies or moves a worksheet or a chart sheet after the last worksheet in the workbook, or if you attempt to do this manually, Microsoft Excel does not insert the copied or moved worksheet after the last worksheet in the workbook.
This behavior occurs when the last worksheet in the workbook is hidden.
This behavior is by design of Microsoft Excel.
Microsoft provides programming examples for illustration only, without warranty either expressed or implied, including, but not limited to, the implied warranties of merchantability and/or fitness for a particular purpose. This article assumes that you are familiar with the programming language being demonstrated and the tools used to create and debug procedures. Microsoft support professionals can help explain the functionality of a particular procedure, but they will not modify these examples to provide added functionality or construct procedures to meet your specific needs. If you have limited programming experience, you may want to contact the Microsoft fee-based consulting line at (800) 936-5200. For more information about the support options available from Microsoft, please see the following page on the World Wide Web:
http://www.microsoft.com/support/supportnet/refguide/To prevent this behavior from occurring, move all hidden sheets to the front in the order of sheet tabs in the workbook. To do this manually, unhide all hidden sheets, drag the sheet tabs to the left (in front of the other tabs), and then rehide the sheets.
Sub MoveHiddenSheets()
For Each xSheet In ActiveWorkbook.Sheets
If xSheet.Visible = False Then
xSheet.Move Before:=Sheets(1)
End If
Next xSheet
End Sub
If Microsoft Excel, you can use the Copy and Move methods within a Visual
Basic macro to copy or move sheets within a single workbook or to another
workbook. You can also copy or move sheets by clicking Move Or Copy Sheet
on the Edit menu.
In earlier versions of Microsoft Excel, you can copy or move a sheet after
the other sheets in the workbook programmatically by using one of the
following commands in a macro:
Sheets("Sheetname").Copy After:=Sheets(Sheets.Count)
-or-
Sheets("Sheetname").Move After:=Sheets(Sheets.Count)
In Microsoft Excel 97, if you run a macro that contains either of these
commands, and the last sheet in the workbook is hidden, the copied or moved
sheet is not inserted at the end of the workbook. Instead, the sheet is
moved to the right of the last visible sheet in the workbook.
Additional query words: XL97 8.0
Keywords : kbdta kbdtacode xlui KbVBA xlvbmigrate
Version :
Platform : WINDOWS
Issue type : kbprb
Last Reviewed: July 1, 1999