'VBA to Select Multiple Sheets
Sub Print_Selected_Sheets()
' Remove Multiple Selections
ActiveWorkbook.Sheets(1).Select
' Select Multiple Sheets - Optional False is to extend the current selection to include any previously selected objects and the specified object
ActiveWorkbook.Sheets(1).Select False
ActiveWorkbook.Sheets(2).Select False
ActiveWorkbook.Sheets(4).Select False
' -----------------------------------------------------------
' Coded by Shasur for http://vbadud.blogspot.com
' -----------------------------------------------------------
ActiveWindow.SelectedSheets.PrintOut Copies:=1
' Remove Multiple Selections
ActiveWorkbook.Sheets(1).Select
End Sub
Showing posts with label VBA to Select Multiple Sheets. Show all posts
Showing posts with label VBA to Select Multiple Sheets. Show all posts
Sunday, May 27, 2007
Subscribe to:
Posts (Atom)
Download Windows Live Toolbar and personalize your Web experience! Add custom buttons to get the information you care about most.