Makro Schriftgröße
05.05.2017 05:28:47
Hans
Nach langer Sucherei habe ich ein Makro gefunden, welches mir einen Zelleninhalt in die Kopfzeile einfügt. Das sieht so aus:
Sub Kopfzeile()
Dim Blatt As Object
For Each Blatt In Sheets
With Blatt.PageSetup
.CenterHeader = Sheets("Ausdruck").Range("AE8").Value
End With
Next
End Sub
Meine Probleme:
1. Kann ich das Makro beim öffnen der Datei automatisch ausführen lassen?
2. Immer wenn ich das Makro per Hand ausführen lasse, formatiert mir Excel die Kopfzeile auf Schriftgröße Calibri 11. Ich möchte aber gerne Calibri 26 haben.
3. For Each Blatt In Sheets heißt wohl für alle Blätter in der Arbeitsmappe, ich brauche aber das Makro nur in dem Tabellenblatt "Ausdruck" und das auch nur auf der ersten Seite!
Ich hoffe ihr könnt mir, trotz der frühen Stunde, helfen!
Vielen Dank
Hans
Anzeige