Live-Forum - Die aktuellen Beiträge
Datum
Titel
16.10.2025 13:18:36
Übersicht von Excel Konstanten
16.10.2025 11:48:44
Makro von Excel in Word aufrufen
16.10.2025 11:16:26
SUMMEWENN erweitern
16.10.2025 09:40:53
Mehrere Konferenzen ohne Personenüberschneidung terminieren
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
140to144
140to144
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Kopfzeile auf ganzer Breite unterstreichen mit VBA

Forumthread: Kopfzeile auf ganzer Breite unterstreichen mit VBA

Kopfzeile auf ganzer Breite unterstreichen mit VBA
24.07.2002 15:50:52
Jens König
Hallo,

gibt es eine Möglichkeit, eine Kopfzeile über die gesamte Seitenbreite durchgehend zu unterstreichen, auch wenn evtl. kein Text vorhanden ist?

Beispiel:
gegebene Kopfzeile:
LeftHeader="bla"
CenterHeader=""
RightHeader="Seite &P"

Diese Kopfzeile soll nun durchgehend vom linken bis zum rechten Seitenrand unterstrichen werden, ohne zusätzliche Leerzeichen in die Strings einzufügen.
Kennt jemand eine Lösung?


Viele Grüße

Jens König

Anzeige

7
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Re: Kopfzeile auf ganzer Breite unterstreichen mit VBA
24.07.2002 15:57:02
L.Vira
Lös das über Wiederholungszeilen.
Re: Kopfzeile auf ganzer Breite unterstreichen mit VBA
24.07.2002 16:15:50
Jens Koenig
Hallo,

Danke für den schnellen Tip, habe das hier gerade probiert, aber leider verstehe ich das nicht so ganz.
Was muss ich denn da eintragen, um eine evtl. leere Kopfzeile komplett zu unterstreichen?

Grüße

Jens König

Re: Kopfzeile auf ganzer Breite unterstreichen mit VBA
24.07.2002 16:18:34
Otto Ecker
Hallo Jens,

Du könntest eine Linie / Rahmen ziehen. Dann mit Seite einrichten / Wiederholungszeilen / fertig

Gruß Otto

Anzeige
Trifft es leider nicht ganz...
24.07.2002 16:30:05
Jens König
Hallo,

die Kopfzeilen müssen in Tabellen eingefügt werden, deren Layout ich nicht verändern darf. Ich kann also keine weiteren Zeilen einfügen, auf die ich dann Bezug nehme.
Die Kopfzeile wird über ein Makro ausgelesen und anschließend für doppelseitigen Ausdruck mal normal, mal gespiegelt wieder eingefügt und jedesmal sollte sie über die gesamte mögliche Breite unterstrichen werden, aber halt in der Kopfzeile und NICHT im Tabellenblatt.

Grüße

Jens König

Anzeige
Re: Kopfzeile auf ganzer Breite unterstreichen mit VBA
24.07.2002 16:42:56
stefan
Hi,

versuchs mal damit:

With ActiveSheet.Range(Cells(1, 1), Cells(1, 10)).Borders(xlBottom)


.LineStyle = xlContinuous
.Weight = xlThin
.ColorIndex = 3


End With

Re: Kopfzeile auf ganzer Breite unterstreichen mit VBA
24.07.2002 17:58:01
L.Vira
z.B. Zeile 1 in der gewünschten Breite mit:
____________________________________________

Im Menü Datei|Seite einrichten|Tabelle kannst du jetzt
die Zeile 1 als Wiederholungszeile festlegen.

Anzeige
Re: Trifft es leider nicht ganz...
24.07.2002 19:25:59
l.vira
Füll die 3 Bereich mitLeerzeichen
Schrift|Unterstreichung|einfach
;

Forumthreads zu verwandten Themen

Variable fett/unterstrichen in Kopfzeile
Peter

Hallo Experten,
ich hätte da gern einmal ein Problem:
Ich soll je nach Tabellenblatt unterschiedliche Texte - z. B. Kosten (Januar 2009) - in der Kopfzeile des Balltes ausgeben. Dabei soll Kosten fett und unterstrichen (Januar 2009) standard und mager ausgegeben werden.
Ich habe es...
23.04.2009 09:59:09
Thread-ID: 1070581
3 Beiträge
Anzeige
Grafik in Kopfzeile gelöscht; wie wieder einfügen?
abdipost

Hallo zusammen,
habe aus einem Tabellenblatt in einer Excel-Mappe die Grafik aus der Kopfzeile gelöscht.
Die Grafik habe ich nicht als Datei vorliegen.
Wie bekomme ich die wieder rein?
In den anderen Tabellenblättern ist sie noch enthalten.
Danke für Eure Hilfe
16.06.2009 15:36:17
Thread-ID: 1081936
9 Beiträge
Zellwert in Kopfzeile einfügen
Manuel

Hallo, kann mir bitte jemand weiterhelfen. Ich müsste den Wert der Zelle A1 (Datum) in der Kofzeile kursiv einfügen mittels vba? Vielen Dank und LG
15.03.2017 11:14:47
Thread-ID: 1547535
4 Beiträge
Tabstops in Wordkopfzeilen mit VBA erkennen
urs

Hallo Zusammen
zur Zeit beschäftige ich mich mit dem Auslesen von Wordkopfzeilen.
Ein Beispiel: Ich möchte die Information zwischen dem 2. und 3. Tabstopp, sowie die Information zwischen dem 6. und 7. Tabstopp aller Word Dateien in einem bestimmten Ordner auslesen.
Wie macht man da...
09.01.2006 10:27:07
Thread-ID: 716590
2 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Infobox / Tutorial

Kopfzeile auf ganzer Breite unterstreichen in Excel

Schritt-für-Schritt-Anleitung

Um die Kopfzeile in Excel auf ganzer Breite zu unterstreichen, kannst du die folgende Methode mit VBA verwenden:

  1. Öffne die Excel-Arbeitsmappe, in der du die Kopfzeile unterstreichen möchtest.

  2. Drücke ALT + F11, um den VBA-Editor zu öffnen.

  3. Füge ein neues Modul hinzu: Klicke auf Einfügen > Modul.

  4. Kopiere den folgenden Code und füge ihn in das Modul ein:

    Sub KopfzeileUnterstreichen()
   With ActiveSheet.PageSetup
       .CenterHeader = "" ' Leerer CenterHeader
       .LeftHeader = "bla" ' Text für die linke Kopfzeile
       .RightHeader = "Seite &P" ' Text für die rechte Kopfzeile
       .CenterHeader = String(100, "_") ' Fülle die CenterHeader mit Unterstreichungen
   End With
End Sub

  5. Schließe den VBA-Editor und führe das Makro aus, um die Kopfzeile zu erstellen.

Häufige Fehler und Lösungen

  • Fehler: Kopfzeile wird nicht unterstrichen.

    • Lösung: Stelle sicher, dass du das Makro ausführst und dass keine anderen Kopfzeilenformate aktiviert sind.

  • Fehler: Die Unterstreichung ist nicht durchgehend.

    • Lösung: Überprüfe die Breite der Kopfzeile. Du kannst die Kopfzeile Breite ändern in den Seiteneinstellungen anpassen.

Alternative Methoden

Wenn du VBA nicht verwenden möchtest, kannst du die Kopfzeile auch manuell unterstreichen:

  1. Gehe zu Seitenlayout und klicke auf Drucktitel.
  2. Wähle den Tab Seite und gehe zu Wiederholungszeilen.
  3. Trage in die gewünschte Zeile Unterstreichungen ein, um eine Linie zu simulieren.

Diese Methode kann jedoch die Flexibilität einschränken, wenn du die Kopfzeile mit Strich in verschiedenen Layouts benötigst.

Praktische Beispiele

Hier einige Beispiele, wie du die Kopfzeile anpassen kannst:

  • Um einen doppelten Strich in der Kopfzeile einzufügen, könntest du den VBA-Code anpassen:

    Sub DoppeltesUnterstreichenKopfzeile()
   With ActiveSheet.Range(Cells(1, 1), Cells(1, 10)).Borders(xlBottom)
       .LineStyle = xlDouble
       .Weight = xlThin
       .ColorIndex = 3
   End With
End Sub

  • Für die Excel Fußzeile Linie einfügen, benutze einen ähnlichen Ansatz, indem du .CenterFooter, .LeftFooter, oder .RightFooter im VBA anpasst.

Tipps für Profis

  • Nutze die Unterstreichen-Tastenkombination (STRG + U), um Text in der Kopfzeile direkt zu unterstreichen, wenn du keine vollständige Linie benötigst.
  • Achte darauf, dass die Kopfzeile in Tabellen eingefügt wird, die nicht verändert werden können, um eine konsistente Darstellung zu gewährleisten.
  • Experimentiere mit verschiedenen Stricharten und -gewichten in den Excel Kopfzeilen Einstellungen, um das gewünschte Design zu erreichen.

FAQ: Häufige Fragen

1. Wie kann ich die Kopfzeile in Excel ganz einfach unterstreichen? Du kannst dies mit VBA tun oder einfach Leerzeichen und Unterstreichungen in die Kopfzeile einfügen.

2. Kann ich auch in Word die Kopfzeile unterstreichen? Ja, in Word kannst du die Funktion "Kopfzeile unterstreichen" nutzen, um eine durchgehende Linie zu erstellen.

3. Wie ändere ich die Breite der Kopfzeile? Das kannst du unter Seitenlayout > Seite einrichten anpassen. Dort findest du die Option, die Kopfzeile Breite zu ändern.

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige