Writing the name in toolbar

J

Jithu

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
 
N

Niek Otten

Hi Jithu

Application.statusbar = "MyTeamName"

--
Kind regards,

Niek Otten
Microsoft MVP - Excel

| 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
 
G

Gord Dibben

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
 
Top