2694 Tipps & Tricks
Kategorie: Software / Excel Tipp im neuen Fenster anzeigen
Datum der Änderung und User in Fusszeile (477 x gelesen)

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
    Dim WS As Worksheet
    For Each WS In ThisWorkbook.Worksheets
        WS.PageSetup.LeftFooter = " gespeichert am " & Date & " von " & Application.UserName
    Next
End Sub


In Excel unter Extras >Macro >Visual Basic Editor
--Diese Arbeitsmappe--  das obige eintragen

Es wird keine Verantwortung übernommen. Die Benutzung erfolgt auf eigene Gefahr.
alle Tipps & Tricks
Validator XHTML + CSS ® 2012   GADDO.DE   BAR-GAMES.DE