View Single Post
 
Old 08-04-2022, 02:56 AM
Guessed's Avatar
Guessed Guessed is offline Windows 10 Office 2016
Expert
 
Join Date: Mar 2010
Location: Canberra/Melbourne Australia
Posts: 3,932
Guessed has a brilliant futureGuessed has a brilliant futureGuessed has a brilliant futureGuessed has a brilliant futureGuessed has a brilliant futureGuessed has a brilliant futureGuessed has a brilliant futureGuessed has a brilliant futureGuessed has a brilliant futureGuessed has a brilliant futureGuessed has a brilliant future
Default

To get the macro to run without manually asking it to run, you need to put it in the ThisWorkbook module and use the built-in names associated with particular events. I would use these ones
Code:
Private Sub Workbook_AfterSave(ByVal Success As Boolean)
  ActiveWindow.Caption = ActiveWorkbook.FullName
End Sub

Private Sub Workbook_Open()
  ActiveWindow.Caption = ActiveWorkbook.FullName
End Sub
__________________
Andrew Lockton
Chrysalis Design, Melbourne Australia
Reply With Quote