Hi Guys
I have this macro that worked when it was set to run after the sheet opened.
But now I want to change it to run before save or run before print.
I tried to alter it myself but its not working. This is what I have:
I have this macro that worked when it was set to run after the sheet opened.
But now I want to change it to run before save or run before print.
I tried to alter it myself but its not working. This is what I have:
Code:
Private Sub Workbook_BeforeSave()
Dim wsheet As Worksheet
For Each wsheet In ActiveWorkbook.Worksheets
Sheets(wsheet.Name).Select
Range("d1").Value = Sheets(1).Range("d1").Value + 1
Dim r As Range
Set r = Worksheets("Sheet1").Range("d2")
With ActiveSheet.PageSetup
.RightFooter = r
End With
Next wsheet
End Sub