From: Chip Pearson on
Put the following code in the ThisWorkbook module of your Personal.xls
workbook (or any other workbook that is normally always open).

Private WithEvents App As Excel.Application

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

Private Sub Workbook_Open()
Set App = Application
End Sub

Cordially,
Chip Pearson
Microsoft Most Valuable Professional,
Excel, 1998 - 2010
Pearson Software Consulting, LLC
www.cpearson.com



On Wed, 17 Mar 2010 21:22:04 -0700, "Joe User" <joeu2004> wrote:

>Is there a simple way to see the full path name (folder and file name) of an
>open workbook?