TIA
Jim C
--
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...
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
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
>.
>
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...