Set the center footer to file path : Worksheet Page Header Footer « Excel « VBA / Excel / Access / Word






  1. VBA / Excel / Access / Word
  2. Excel
  3. Worksheet Page Header Footer

Set the center footer to file path

 

Sub FilePathInFooter()
  Dim i As Integer, FilePath As String
  
  FilePath = ActiveWorkbook.FullName
  For i = 1 To Worksheets.Count Step 1
    Worksheets(i).PageSetup.CenterFooter = FilePath
  Next i
End Sub








Related examples in the same category

1.To print header, control the font and to pull second line of header (the date) from worksheet
2.Set center footer to your string text