Footer to list Directory & Filename

T

TigerLady

I can get the Filename to list in the foot. But, I need the Directory
information to also print. How can this be done?
 
B

Bob Phillips

Private Sub Workbook_BeforePrint(Cancel As Boolean)
With ActiveSheet.PageSetup
.LeftFooter = ThisWorkbook.FullName
End With
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

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

Peo Sjoblom

Click the icon that looks like an open folder and you will get the path

--


Regards,


Peo Sjoblom
 
T

TigerLady

Ok, I work in an office with people that won't understand how to do this.
And even if they did, they would mess it up.

I need a code that goes in the Custom Footer section that will print up the
Directory information, ie &[File] prints the file name.
 
P

Peo Sjoblom

&[Path]&[File]

You can't just get the folder and file name


--


Regards,


Peo Sjoblom


TigerLady said:
Ok, I work in an office with people that won't understand how to do this.
And even if they did, they would mess it up.

I need a code that goes in the Custom Footer section that will print up
the
Directory information, ie &[File] prints the file name.

Bob Phillips said:
Private Sub Workbook_BeforePrint(Cancel As Boolean)
With ActiveSheet.PageSetup
.LeftFooter = ThisWorkbook.FullName
End With
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

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

TigerLady

Ok, I set up in the footer field the &[Path]&[File] and it prints;
Path] Filename.xls

So, the actual Path name should be G:\Client Folders, and it didn't print.

Any more suggestions

Peo Sjoblom said:
&[Path]&[File]

You can't just get the folder and file name


--


Regards,


Peo Sjoblom


TigerLady said:
Ok, I work in an office with people that won't understand how to do this.
And even if they did, they would mess it up.

I need a code that goes in the Custom Footer section that will print up
the
Directory information, ie &[File] prints the file name.

Bob Phillips said:
Private Sub Workbook_BeforePrint(Cancel As Boolean)
With ActiveSheet.PageSetup
.LeftFooter = ThisWorkbook.FullName
End With
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

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

I can get the Filename to list in the foot. But, I need the Directory
information to also print. How can this be done?
 
D

Dave Peterson

What version of excel are you using?

I _think_ the &[Path] was added in xl2002.

You may want to try John Walkenbach's AddPath addin:
http://j-walk.com/ss/excel/files/addpath.htm
Ok, I set up in the footer field the &[Path]&[File] and it prints;
Path] Filename.xls

So, the actual Path name should be G:\Client Folders, and it didn't print.

Any more suggestions

Peo Sjoblom said:
&[Path]&[File]

You can't just get the folder and file name


--


Regards,


Peo Sjoblom


TigerLady said:
Ok, I work in an office with people that won't understand how to do this.
And even if they did, they would mess it up.

I need a code that goes in the Custom Footer section that will print up
the
Directory information, ie &[File] prints the file name.

:

Private Sub Workbook_BeforePrint(Cancel As Boolean)
With ActiveSheet.PageSetup
.LeftFooter = ThisWorkbook.FullName
End With
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

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

I can get the Filename to list in the foot. But, I need the Directory
information to also print. How can this be done?
 
T

TigerLady

Excel 2000

Dave Peterson said:
What version of excel are you using?

I _think_ the &[Path] was added in xl2002.

You may want to try John Walkenbach's AddPath addin:
http://j-walk.com/ss/excel/files/addpath.htm
Ok, I set up in the footer field the &[Path]&[File] and it prints;
Path] Filename.xls

So, the actual Path name should be G:\Client Folders, and it didn't print.

Any more suggestions

Peo Sjoblom said:
&[Path]&[File]

You can't just get the folder and file name


--


Regards,


Peo Sjoblom


Ok, I work in an office with people that won't understand how to do this.
And even if they did, they would mess it up.

I need a code that goes in the Custom Footer section that will print up
the
Directory information, ie &[File] prints the file name.

:

Private Sub Workbook_BeforePrint(Cancel As Boolean)
With ActiveSheet.PageSetup
.LeftFooter = ThisWorkbook.FullName
End With
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

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

I can get the Filename to list in the foot. But, I need the Directory
information to also print. How can this be done?
 
D

Dave Peterson

So John's addin worked fine for you??
Excel 2000

Dave Peterson said:
What version of excel are you using?

I _think_ the &[Path] was added in xl2002.

You may want to try John Walkenbach's AddPath addin:
http://j-walk.com/ss/excel/files/addpath.htm
Ok, I set up in the footer field the &[Path]&[File] and it prints;
Path] Filename.xls

So, the actual Path name should be G:\Client Folders, and it didn't print.

Any more suggestions

:

&[Path]&[File]

You can't just get the folder and file name


--


Regards,


Peo Sjoblom


Ok, I work in an office with people that won't understand how to do this.
And even if they did, they would mess it up.

I need a code that goes in the Custom Footer section that will print up
the
Directory information, ie &[File] prints the file name.

:

Private Sub Workbook_BeforePrint(Cancel As Boolean)
With ActiveSheet.PageSetup
.LeftFooter = ThisWorkbook.FullName
End With
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

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

I can get the Filename to list in the foot. But, I need the Directory
information to also print. How can this be done?
 
T

TigerLady

It didn't work.

Dave Peterson said:
So John's addin worked fine for you??
Excel 2000

Dave Peterson said:
What version of excel are you using?

I _think_ the &[Path] was added in xl2002.

You may want to try John Walkenbach's AddPath addin:
http://j-walk.com/ss/excel/files/addpath.htm

TigerLady wrote:

Ok, I set up in the footer field the &[Path]&[File] and it prints;
Path] Filename.xls

So, the actual Path name should be G:\Client Folders, and it didn't print.

Any more suggestions

:

&[Path]&[File]

You can't just get the folder and file name


--


Regards,


Peo Sjoblom


Ok, I work in an office with people that won't understand how to do this.
And even if they did, they would mess it up.

I need a code that goes in the Custom Footer section that will print up
the
Directory information, ie &[File] prints the file name.

:

Private Sub Workbook_BeforePrint(Cancel As Boolean)
With ActiveSheet.PageSetup
.LeftFooter = ThisWorkbook.FullName
End With
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

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

I can get the Filename to list in the foot. But, I need the Directory
information to also print. How can this be done?
 
D

Dave Peterson

That's too bad. It's worked for me and lots of other people.
It didn't work.

Dave Peterson said:
So John's addin worked fine for you??
Excel 2000

:

What version of excel are you using?

I _think_ the &[Path] was added in xl2002.

You may want to try John Walkenbach's AddPath addin:
http://j-walk.com/ss/excel/files/addpath.htm

TigerLady wrote:

Ok, I set up in the footer field the &[Path]&[File] and it prints;
Path] Filename.xls

So, the actual Path name should be G:\Client Folders, and it didn't print.

Any more suggestions

:

&[Path]&[File]

You can't just get the folder and file name


--


Regards,


Peo Sjoblom


Ok, I work in an office with people that won't understand how to do this.
And even if they did, they would mess it up.

I need a code that goes in the Custom Footer section that will print up
the
Directory information, ie &[File] prints the file name.

:

Private Sub Workbook_BeforePrint(Cancel As Boolean)
With ActiveSheet.PageSetup
.LeftFooter = ThisWorkbook.FullName
End With
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

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

I can get the Filename to list in the foot. But, I need the Directory
information to also print. How can this be done?
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top