Excel VBA

...e_015...


Left footer with path

Sub LF_with_path()
    ActiveSheet.PageSetup.LeftFooter = _
    ActiveWorkbook.FullName
End Sub


Right footer with Username

Sub RF_with_UserName()
 ActiveSheet.PageSetup.RightFooter = Application.UserName
End Sub

by Monika Weber