Writing the name in toolbar
Private Sub Workbook_Open()
Application.StatusBar = "MyTeamName"
End Sub
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Application.StatusBar = ""
End Sub
Placed in Thisworkbook module.
You could alternatively place MyTeamName in the Title Bar at top of Window.
Private Sub Workbook_Open()
ActiveWindow.Caption = "MyTeamName"
End Sub
Private Sub Workbook_BeforeClose(Cancel As Boolean)
ActiveWindow.Caption = ""
End Sub
Gord Dibben MS Excel MVP
On Tue, 6 Nov 2007 04:21:01 -0800, Jithu
wrote:
Hi Friends,
Can someone help in writing my team's name in the excel?
The name should come inside the border. (In excel, below the sheet tab, you
can always see a command "READY".) i want to display the name near to the
text "READY"..(making more clear - if you right click the mentioned space you
can select count, sum, average etc)
Thanks in advance for your time
Jithu
|