Footer to list Directory & Filename

  • Thread starter Thread starter TigerLady
  • Start date Start date
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?
 
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)
 
Click the icon that looks like an open folder and you will get the path

--


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.
 
&[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)
Click to expand...
Click to expand...
 
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?
Click to expand...
Click to expand...
Click to expand...
 
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?
Click to expand...
Click to expand...
Click to expand...
 
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?
Click to expand...
Click to expand...
Click to expand...
 
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?
Click to expand...
Click to expand...
Click to expand...
 
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?
Click to expand...
Click to expand...
Click to expand...
 
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?
Click to expand...
Click to expand...
Click to expand...
 
Back
Top