Writing the name in toolbar

[Guest]

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

 

[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

 

[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