Gruppe
Allgemein
Problem
Wie kann ich das gestrige Datum in die Fußzeile einfügen?
StandardModule: basMain
Sub FooterYesterday()
With ActiveSheet
.PageSetup.LeftFooter = Format(Date - 1, "dd.mm.yy")
.PrintPreview
End With
End Sub