View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
Chris Chris is offline
external usenet poster
 
Posts: 1
Default Change sheet reference

Hello all,

I am new to this level of macros. I have the following:

Sub CritSuccessFY04()
'
' PrintFY04AccntAcq Macro
' Macro recorded 12/3/2003 by cwilson
'

'
Sheets("Monthly Summary").Select
Range("E215:P233").Select
ActiveSheet.PageSetup.PrintArea = "$E$215:$P$233"
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
ActiveSheet.PageSetup.PrintArea = ""
Sheets("Print Macros").Select
End Sub

I have a least 5 macros and I want them to run for different sheets if a different button is pressed. Can this be done without copy the macro over and over? I have a lot of sheets.

Thanks in advance.