Getting sheetname that calls a macro.

  • Thread starter Thread starter Ed Davis
  • Start date Start date
E

Ed Davis

Is it possible to get the sheet name that a macro is called from.
I am using the code below to make a backup when the macro is called but it
can be called from any of 31 sheets.

Code =
ThisWorkbook.SaveCopyAs ThisWorkbook.Path &
"\Backup\Sales\Work\Change_Retails " & Format(Now, "dd-mm-yy hhmmss") &
".xls"
End of code

I would like to include the sheet name in the backup name
 
dim strSH as string

strSH = activesheet.name

Code =
ThisWorkbook.SaveCopyAs ThisWorkbook.Path &
"\Backup\Sales\Work\Change_Retails\"& strSH & Format(Now, "dd-mm-yy
hhmmss") & ".xls"

Not tested
 
Back
Top