title bar
 

Excel 2000

Is there a way of changing the contents of the Title bar
so Microsoft Excel is not part of the bar?

I am doing a special workbook for our company and we want
just our company name at the top.

Thanks

Hi Greg,

In the ThisWorkbook module of the special workbook paste the following:

Private Sub Workbook_Activate()
Application.Caption = "My Company Name" <<=== CHANGE
End Sub

Private Sub Workbook_Deactivate()
Application.Caption = ""
End Sub

This will apply the custom title bar text when the special workbook is the
active workbook and will restore the default if another workbook is active.

Change the caption text to suit your needs.

---
Regards,
Norman



"greg" wrote in message
...
Excel 2000

Is there a way of changing the contents of the Title bar
so Microsoft Excel is not part of the bar?

I am doing a special workbook for our company and we want
just our company name at the top.

Thanks

Hi Norman,

Thanks, that worked great!!

-----Original Message-----
Hi Greg,

In the ThisWorkbook module of the special workbook paste
the following:

Private Sub Workbook_Activate()
Application.Caption = "My Company Name" <<=== CHANGE
End Sub

Private Sub Workbook_Deactivate()
Application.Caption = ""
End Sub

This will apply the custom title bar text when the
special workbook is the
active workbook and will restore the default if another
workbook is active.

Change the caption text to suit your needs.

---
Regards,
Norman



"greg" wrote in message
...
Excel 2000

Is there a way of changing the contents of the Title
bar
so Microsoft Excel is not part of the bar?

I am doing a special workbook for our company and we
want
just our company name at the top.

Thanks


.