Schriftart + Datum in Fusszeile per VBA
15.09.2005 13:49:32
Xico
in meine Fusszeile gebe ich automatisch das Datum aus. Nun möchte ich dies auch in einer bestimmten Schriftart ausgeben. Wer kann mir helfen:
Sub Fuss()
With ActiveSheet
.PageSetup.RightFooter = Format(DateSerial(Year(Now()), _
Month(Now()) + 1, 1) - 1, "dd.mm.yyyy") '<=====|
End With '|
End
Sub '|
' wie bekomme ich diese Schrift hier rein?!? |
'"&""Courier New,Standard" ---------------------------------------------|
Danke schon mal für 'n guten Tip & Gruss
Xico