Modify Excel title bar

Is there a way to modify the excel's title bar, so instead of displaying "Microsoft Excel and the file's name" it shows my name or other information.
Tanks

Hi,
Here are a couple of macros I use.
Enter them into "ThisWorkbook Item"
ie, once in the workbook, press Alt+F11 to activate the VBE
Locate the worlbook in the Project window
Double-click the project to display ite items, if necessary.
Double-click the ThisWorkbook item. - The VBE displays an empty code window for the ThisWorkbook object
In the Code window, select Workbook from the Object (left) drop down list, and enter the following vba code.
Note, I have a couple of lines of code that I enter to limit the scrolling area to stop people scrolling down to the bottom of the page, and also another line of code to limit access to only unlocked cells.

Dont forget to return the caption to "Excel and the file name" when you are finished.

Private Sub Workbook_Open()

'Change the caption from Excel and file name to whatever you want
Application.Caption = "My name and any other information here"

'Limits scroll area to A1:H7 in Sheet1..change sheet name if you have to
Worksheets("Sheet1").ScrollArea = "A1:H7"

'Limits access to only unlocked cells in SAheet1..change name if you have to
Worksheets("Sheet1").EnableSelection = xlUnlockedCells

End Sub



Private Sub Workbook_BeforeClose(Cancel As Boolean)

'Reset caption to standard caption.
Application.Caption = ""

End Sub