Text in Kopfzeile fett formatieren

Forumthread: Text in Kopfzeile fett formatieren

16.01.2006 12:55:06

Frank

Mit welchem Befehl kann man einen Text in der Kopfzeile eines Dokumentes fett formatieren?
Habe folgendes Makro geschrieben um immer wiederkehrende Informationen in die Textzeile zu schreiben:
Sub rewe_fussnote()
ScreenUpdating = False
pfad_text = ActiveWorkbook.Path 'liefert den kompletten Pfad
With ActiveSheet.PageSetup
'.LinkeKopfzeile
.LeftHeader = "&8Firma gmbh" & Chr(10) & "Abteilung XX"
.CenterHeader = "&8" & ActiveSheet.Name
'.RechteKopfzeile
.RightHeader = "&8Essen, den " & Chr(10) & "IT/ Herr XX/ -Durchwahl" & Chr(10) & "Seite &P/ &N"
'.LeftFooter = "&6" & pfad_text & "\" & ("&F")
.LeftFooter = "&8&D"
.CenterFooter = ""
.RightFooter = ""
'.LinkerRand = Anwendung.ZollInPunkte(0,787401575)
'.RechterRand = Anwendung.ZollInPunkte(0,787401575)
'.ObererRand = Anwendung.ZollInPunkte(0,984251969)
'.UntererRand = Anwendung.ZollInPunkte(0,984251969)
'.Kopfzeilenrand = Anwendung.ZollInPunkte(0,511811023)
'.Fusszeilenrand = Anwendung.ZollInPunkte(0,511811023)
'.ZeilenSpaltenköpfeDrucken = Falsch
'.GitternetzlinienDrucken = Wahr
'.NotizenDrucken = Falsch
.CenterHorizontally = True
.CenterVertically = False
'.Ausrichtung = xlHochformat
'.Entwurfsqualität = Falsch
.PaperSize = xlPaperA4
.FirstPageNumber = xlAutomatic
.Order = xlDownThenOver
.BlackAndWhite = False
' .Zoom = 100
End With
ScreenUpdating = True
Danke für Eure Hilfe!

2
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: Text in Kopfzeile fett formatieren

16.01.2006 15:19:38

Horst
AW: Text in Kopfzeile fett formatieren

17.01.2006 07:39:21

Frank

AW: Text in Kopfzeile fett formatieren

16.01.2006 15:19:38

Horst

Hi,
tu es und lass dabei den Rekorder aufzeichnen, kommt sowas bei raus:
.LeftHeader = "&""Arial,Fett""Fettes Brot"
mfg Horst

AW: Text in Kopfzeile fett formatieren

17.01.2006 07:39:21

Frank

Horst Du bist genial - vielen Dank es funktioniert!

Infobox / Tutorial

Text in der Kopfzeile fett formatieren in Excel

Schritt-für-Schritt-Anleitung
Häufige Fehler und Lösungen
Alternative Methoden
Praktische Beispiele
Tipps für Profis
FAQ: Häufige Fragen

Schritt-für-Schritt-Anleitung

Um den Text in der Kopfzeile eines Excel-Dokuments fett zu formatieren, kannst Du das folgende Makro verwenden. Notiere Dir, dass dies in den meisten Versionen von Excel funktioniert, einschließlich Excel 2016 und neuer.

Öffne Excel und drücke Alt + F11, um den VBA-Editor zu öffnen.
Klicke auf Einfügen und dann auf Modul, um ein neues Modul zu erstellen.

Füge den folgenden Code in das Modul ein:

Sub KopfzeileFett()
    With ActiveSheet.PageSetup
        .LeftHeader = "&""Arial,Bold""Fettes Brot"
        .CenterHeader = "&""Arial,Bold""" & ActiveSheet.Name
        .RightHeader = "&""Arial,Bold""Essen, den " & Format(Date, "dd.mm.yyyy") & " - Seite &P"
    End With
End Sub

Schließe den VBA-Editor und kehre zu Excel zurück.
Führe das Makro aus, indem Du Alt + F8 drückst, das Makro KopfzeileFett auswählst und auf Ausführen klickst.

Jetzt sollte der Text in der Kopfzeile Deines Excel-Dokuments fett formatiert sein.

Häufige Fehler und Lösungen

Fehler: Kopfzeile wird nicht fett angezeigt.
- Lösung: Stelle sicher, dass Du die Schriftart korrekt angegeben hast. Verwende das Format &"Schriftart,Fett" und achte darauf, dass die Schriftart installiert ist.
Fehler: Makro funktioniert nicht.
- Lösung: Überprüfe, ob Makros in Deinen Excel-Einstellungen aktiviert sind. Gehe dazu zu Datei > Optionen > Sicherheitscenter > Einstellungen für das Sicherheitscenter > Einstellungen für Makros.

Alternative Methoden

Falls Du kein Makro verwenden möchtest, kannst Du die Kopfzeile auch manuell formatieren:

Gehe zu Seitenlayout in der Ribbon-Leiste.
Klicke auf Drucken.
Wähle Kopfzeile und gib den gewünschten Text ein.
Um den Text fett zu formatieren, kannst Du die Textbearbeitungsoptionen verwenden, die beim Bearbeiten der Kopfzeile angezeigt werden.

Praktische Beispiele

Hier sind einige Beispiele, wie Du die Kopfzeile anpassen kannst:

Beispiel 1: Nur der Firmenname fett

.LeftHeader = "&""Arial,Bold""Firma GmbH"

Beispiel 2: Datum und Seitenzahl fett

.RightHeader = "&""Arial,Bold""Essen, den " & Format(Date, "dd.mm.yyyy") & " - Seite &P"

Experimentiere mit verschiedenen Schriftarten und -größen, um die ideale Darstellung für Dein Dokument zu finden.

Tipps für Profis

Nutze die Chr(10) Funktion, um Zeilenumbrüche in der Kopfzeile zu erstellen.
Du kannst auch verschiedene Schriftarten kombinieren, indem Du sie in den Kopfzeilen-Formatierungsoptionen mischst.
Überlege, wie die Kopfzeile beim Drucken aussieht; teste das Layout im Druckvorschau-Modus.

FAQ: Häufige Fragen

1. Wie kann ich die Kopfzeile dauerhaft für alle neuen Arbeitsblätter festlegen?
Du kannst ein Standard-Arbeitsblatt erstellen, das die Kopfzeile enthält, und dieses dann als Vorlage speichern.

2. Funktioniert das auch in Excel Online?
Excel Online bietet derzeit nicht die Möglichkeit, Makros zu verwenden. Die manuelle Formatierung ist jedoch möglich.

3. Kann ich unterschiedliche Kopfzeilen für verschiedene Seiten festlegen?
Ja, Du kannst unterschiedliche Kopfzeilen für gerade und ungerade Seiten festlegen, indem Du die entsprechenden Optionen in den Seitenlayout-Einstellungen verwendest.

Beliebteste Forumthreads (12 Monate)

Text in Kopfzeile fett formatieren

Forumthread: Text in Kopfzeile fett formatieren

2 Beiträge zum Forumthread Beiträge zu diesem Forumthread

VBA Beispiele zu diesem und ähnlichen Themen

Infobox / Tutorial

Text in der Kopfzeile fett formatieren in Excel

Schritt-für-Schritt-Anleitung

Häufige Fehler und Lösungen

Alternative Methoden

Praktische Beispiele

Tipps für Profis

FAQ: Häufige Fragen

Beliebteste Forumthreads (12 Monate)

2
Beiträge zum Forumthread

Beiträge zu diesem Forumthread