title image


Smiley so vielleicht
hiho



.LeftFooter = "last Savetime:" & Format(ThisWorkbook.BuiltinDocumentProperties(12), "dd.mm.yy")





bzw. wenn das Makro vor dem Ausdruck ausgeführt werden sollte



Private Sub Workbook_BeforePrint(Cancel As Boolean)

ActiveSheet.PageSetup .LeftFooter = "last Savetime:" & Format(ThisWorkbook.BuiltinDocumentProperties(12), "dd.mm.yy")

End Sub





dieses Makro liegt nicht in einem MODUL sondern in "dieserArbeitsmappe"


Feedback nicht vergessen ! Gutes gelingen wünscht Chris



geschrieben von


Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: