How can I show the name of the spreadsheet -after Microsoft Excel- ( on top
of the Main Menu Bar).
Thanks a lot in advance.
Humberto

Right-click the Menu barCustomizeCommands-tabWebAddress ...drag
this to the Menu bar.

HTH Sige


Humberto wrote:
How can I show the name of the spreadsheet -after Microsoft Excel- ( on top
of the Main Menu Bar).
Thanks a lot in advance.
Humberto

Option Explicit

Public WithEvents App As Application

Private Sub App_WindowActivate(ByVal Wb As Workbook, ByVal Wn As Window)
App.Caption = "Microsoft Excel - " & Wb.FullName
End Sub

Private Sub Workbook_Open()
Set App = Application
End Sub



'This is workbook event code.
'To input this code, right click on the Excel icon on the worksheet
'(or next to the File menu if you maximise your workbooks),
'select View Code from the menu, and paste the code



--
HTH

Bob Phillips

(remove xxx from email address if mailing direct)

"Humberto" wrote in message
...
How can I show the name of the spreadsheet -after Microsoft Excel- ( on
top
of the Main Menu Bar).
Thanks a lot in advance.
Humberto