Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

Title Bar

6 views
Skip to first unread message

Jim C

unread,
Apr 10, 2003, 4:35:11 PM4/10/03
to
Can you get excel to display the files full path on the
tile bar like many other application do.

TIA

Jim C

Jimmy L. Day

unread,
Apr 10, 2003, 4:48:02 PM4/10/03
to
Which apps display the full path on the title bar?

--
Greeting from the Mississippi Gulf Coast!
http://myweb.cableone.net/twodays
"Jim C" <jr...@bellatlantic.net> wrote in message
news:05c701c2ffa0$af3b8940$3301...@phx.gbl...

Ken Macksey

unread,
Apr 10, 2003, 5:22:58 PM4/10/03
to
Hi

If you put this in the workbook open sub you will get what you want.
The limitation is that it must be in each workbook or may be able to be run
from personal.xls.

When you close excel, it reverts to it's defaut the next time it is opened.


' excel adds the activeworkbook name to the end of anything assigned to the
caption.

thepath = Application.ActiveWorkbook.Path
Application.Caption = thepath

HTH

Ken


---
Outgoing mail is certified Virus Free.
Checked by AVG anti-virus system (http://www.grisoft.com).
Version: 6.0.467 / Virus Database: 266 - Release Date: 01/04/2003


Dave Peterson

unread,
Apr 10, 2003, 7:49:31 PM4/10/03
to
you could do something like this:

In your personal.xls file, hit alt-f11 to go to the VBE.

Click on Insert
and choose Class Module
Make sure it's called Class1 (we'll refer to it later by that name).

Paste this in:

Option Explicit
Public WithEvents xlApp As Excel.Application
Private Sub xlApp_WindowActivate(ByVal Wb As Workbook, ByVal Wn As Window)
Wn.Caption = Wb.FullName
End Sub


---------
Now rightclick on the ThisWorkbook object and select view code. (You might have
to hit ctrl-R to see the project explorer.)

Paste this in:

Option Explicit
Dim myTitle As Class1
Private Sub Workbook_Open()
Set myTitle = New Class1
Set myTitle.xlApp = Application
End Sub
Private Sub workbook_close()
Set myTitle.xlApp = Nothing
End Sub

==============
You can read a lot more about application events at Chip Pearson's site:
http://www.cpearson.com/excel/AppEvent.htm

And workbook/worksheet events at:
http://www.cpearson.com/excel/events.htm

And David McRitchie has some notes at:
http://www.mvps.org/dmcritchie/excel/event.htm

And just getting started???
David McRitchie's site:
http://www.mvps.org/dmcritchie/excel/getstarted.htm

--

Dave Peterson
ec3...@msn.com

Jimmy L. Day

unread,
Apr 11, 2003, 8:07:17 AM4/11/03
to
Just to name 3 :Windows explorer, Corel Quattro, Autocad

>.
>

Jimmy L. Day

unread,
Apr 11, 2003, 8:55:37 AM4/11/03
to
This is new...the first name someone has appropriated my name!

There are certainly more things I do not know than those I know! I have
many programs (mostly MS and Adobe) none of which display the full file
path in the app title bar. Live and learn.

--
Greeting from the Mississippi Gulf Coast!
http://myweb.cableone.net/twodays

"Jimmy L. Day" <two...@cableone.net> wrote in message
news:04cd01c30022$e5906740$a601...@phx.gbl...

0 new messages