OK,
Code:
Sub SaveMe()
Application.Goto Reference:=['Title Sheet'!A1]
' Change Title Sheet name and the location of your logo to suit
ActiveWorkbook.Save
End With
Assuming that you want to go to the Title Sheet upon closing, this is one method.
Code:
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Application.Goto Reference:=['Title Sheet'!A1]
' Change Title Sheet name and the location of your logo to suit
ActiveWorkbook.Close True
End With
Hope that helps,
Smitty