Full path-name in title bar ?
 

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

Full path-name in title bar ?
 

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

Full path-name in title bar ?
 

Thanks Bob,

I get the full name, except i've got a 'subscript out of range' error as
soon as i close a window.

Secondly, i have to open that specific file first before the full path
appears.

Stefan

Full path-name in title bar ?
 

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

Full path-name in title bar ?
 

Stefan,

I would have put it in Personal.xls, not have another file opened.

--
HTH

Bob Phillips

(remove nothere from email address if mailing direct)

"Stefan" <123@abc wrote in message
...
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

Full path-name in title bar ?
 

Just wondering why you included this routine:

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

The captions seem to get updated fine without it.



Bob Phillips wrote:

Stefan,

I would have put it in Personal.xls, not have another file opened.

--
HTH

Bob Phillips

(remove nothere from email address if mailing direct)

"Stefan" <123@abc wrote in message
...
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

--

Dave Peterson

Full path-name in title bar ?
 

"Bob Phillips" wrote:

Stefan,

I would have put it in Personal.xls, not have another file opened.

--
HTH


Can you give me some more information, i cant follow.
Is personal.xls the name of that file and in which directory must i save it??

thnx
Stefan

Full path-name in title bar ?
 

Stefan,

Personal.xls is a file that Excel knows about, and is normally used to store
your personal, application wide code. If you go to ToolsMacroRecord New
Macro ..., and you will see a dialog. If you click the drop-down on the
right, one of the options is Personal.xls. Just select that and click OK<
then hit the Stop Recording button immediately. That will create a
Personal.xls file for you. This is saved in the XLStart directory, and
automatically opens when Excel starts, but in a non-visible state. This is a
good file for stuffing code like this.

--
HTH

Bob Phillips

(remove nothere from email address if mailing direct)

"Stefan" <123@abc wrote in message
...
"Bob Phillips" wrote:

Stefan,

I would have put it in Personal.xls, not have another file opened.

--
HTH


Can you give me some more information, i cant follow.
Is personal.xls the name of that file and in which directory must i save
it??

thnx
Stefan

Full path-name in title bar ?
 

Stefan,

Personal.xls is a file that Excel knows about, and is normally used to store
your personal, application wide code. If you go to ToolsMacroRecord New
Macro ..., and you will see a dialog. If you click the drop-down on the
right, one of the options is Personal.xls. Just select that and click OK<
then hit the Stop Recording button immediately. That will create a
Personal.xls file for you. This is saved in the XLStart directory, and
automatically opens when Excel starts, but in a non-visible state. This is a
good file for stuffing code like this.

--
HTH


Thanks.

I gonna try it.

Full path-name in title bar ?
 

Bob,


It works just perfect. Thank you.

My college at work has asked it. She's gonna be wild if she see's this.

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

Full path-name in title bar ?
 

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

Full path-name in title bar ?
 

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

Full path-name in title bar ?
 

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

Full path-name in title bar ?
 

"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