Full path-name in title bar ?

Can something be added to update the Path in the title bar when you save the
workbook as a different file name?

"Bob Phillips" wrote:


Public WithEvents App As Application

Private Sub App_WindowActivate(ByVal Wb As Workbook, ByVal Wn As Window)
Wn.Caption = Wb.FullName
End Sub

Private Sub App_WorkbookBeforeClose(ByVal Wb As Workbook, Cancel As Boolean)
App_WindowActivate Wb, Windows(Wb.Name)
End Sub

Private Sub Workbook_Open()
Set App = Application
End Sub

'This is workbook event code.
'To input this code, right click on the Excel icon on the worksheet
'(or next to the File menu if you maximise your workbooks),
'select View Code from the menu, and paste the code



--
HTH

Bob Phillips

(remove nothere from email address if mailing direct)

"Stefan" 123@abc wrote in message
...
Hello,

Is it possible to put the full path name of the opened file in the bleu
title bar from excel, this always en automatically.

-- Microsoft Excel - c:/data/stefan/filename instead of Microsoft
Excel -
filename


Many thanks
Stefan

Would you please show your complete code? Thanks.

"Stefan" wrote:

Bob,

With an 'on error goto' statement i can prevent that 'subscript out of
range' error. Complete path-name still occurs.

The second problem was solved by saving the file in the 'XLStart' directory
of Microsoft Office and put an extra program line so that Excel automatically
starts with that file and immediately minimizes the windowstate of it.

Again thanks for putting me on the way.
Stefan

Who are you asking Jack, Stefan or me?

--
HTH

Bob

(there's no email, no snail mail, but somewhere should be gmail in my addy)

"Jack Mills" wrote in message
...
Would you please show your complete code? Thanks.

"Stefan" wrote:

Bob,

With an 'on error goto' statement i can prevent that 'subscript out of
range' error. Complete path-name still occurs.

The second problem was solved by saving the file in the 'XLStart'
directory
of Microsoft Office and put an extra program line so that Excel
automatically
starts with that file and immediately minimizes the windowstate of it.

Again thanks for putting me on the way.
Stefan

Either, Bob. I don't know how to handle the 'on error go to' statement that
Stefan refers to above. By seeing the complete code, I will learn how to
handle such an error in the future. TIA

"Bob Phillips" wrote:

Who are you asking Jack, Stefan or me?

--
HTH

Bob

(there's no email, no snail mail, but somewhere should be gmail in my addy)

"Jack Mills" wrote in message
...
Would you please show your complete code? Thanks.

"Stefan" wrote:

Bob,

With an 'on error goto' statement i can prevent that 'subscript out of
range' error. Complete path-name still occurs.

The second problem was solved by saving the file in the 'XLStart'
directory
of Microsoft Office and put an extra program line so that Excel
automatically
starts with that file and immediately minimizes the windowstate of it.

Again thanks for putting me on the way.
Stefan

"Stefan" wrote:

Hello,

Is it possible to put the full path name of the opened file in the bleu
title bar from excel, this always en automatically.

-- Microsoft Excel - c:/data/stefan/filename instead of Microsoft Excel -
filename


Many thanks
Stefan