Tipp: Andere Sprachen sind Google-Übersetzungen. Sie können die English Version dieses Links.
Einloggen
x
or
x
x
Registrieren
x

or

Wie werden Zeilen am Ende jeder gedruckten Seite in Excel wiederholt gedruckt?

Standardmäßig bietet Excel eine Funktion, mit der Benutzer Zeilen oben wiederholt drucken können. In manchen Fällen ziehen Sie es jedoch vor, Zeilen am unteren Rand der Seiten mit Ausnahme von oben zu drucken. Dieser Artikel zeigt Ihnen kleine Tricks.

Drucken Sie die Zeilen wiederholt unten mit VBA-Code


Registerkarte "Office" Aktivieren Sie das Bearbeiten und Durchsuchen von Registerkarten in Office und vereinfachen Sie Ihre Arbeit erheblich ...
Kutools for Excel - Das beste Office-Produktivitäts-Tool löst die meisten Ihrer Excel-Probleme
  • Alles wiederverwenden: Fügen Sie die am häufigsten verwendeten oder komplexesten Formeln, Diagramme und andere Elemente zu Ihren Favoriten hinzu und verwenden Sie sie in Zukunft schnell wieder.
  • Mehr als 20-Textfunktionen: Extrahieren Sie die Nummer aus der Textzeichenfolge. Teile von Texten extrahieren oder entfernen; Zahlen und Währungen in englische Wörter umrechnen ...
  • Tools zusammenführen: Mehrere Arbeitsmappen und Blätter in einer; Mehrere Zellen / Zeilen / Spalten zusammenführen, ohne Daten zu verlieren; Doppelte Zeilen und Summe zusammenführen ...
  • Geteilte Werkzeuge: Aufteilen von Daten in mehrere Blätter basierend auf dem Wert; Eine Arbeitsmappe in mehrere Excel-, PDF- oder CSV-Dateien; Eine Spalte zu mehreren Spalten ...
  • Einfügen überspringen Versteckte / Gefilterte Zeilen; Zählung und Summe nach Hintergrundfarbe; Mailingliste erstellen und Senden Sie E-Mails nach dem Wert von Cell...
  • Super Filter: Erstellen Sie erweiterte Filterschemata und wenden Sie diese auf alle Blätter an. Art nach Woche, Tag, Häufigkeit und mehr; Filtern durch Fettdruck, Formeln, Kommentar ...
  • Mehr als 300 leistungsstarke Funktionen; Funktioniert mit Office 2007-2019 und 365; Unterstützt alle Sprachen; Einfache Bereitstellung im Unternehmen; Kostenlose 60-Testversion für alle Funktionen.

Drucken Sie die Zeilen wiederholt unten mit VBA-Code


Sie können den folgenden VBA-Code ausführen, um die angegebene Zeile in die Fußzeile jeder Seite einzufügen. Und dann können Sie diese Zeile wiederholt am Ende jeder gedruckten Seite in Excel drucken.

1. Drücken Sie Andere + F11 Tasten gleichzeitig zum Öffnen der Microsoft Visual Basic für Anwendung Fenster.

2. In dem Microsoft Visual Basic für Anwendung Dialogfeld, klicken Sie auf Einsatz > Modul. Kopieren Sie dann den folgenden VBA-Code und fügen Sie ihn in das Modulfenster ein.

VBA-Code: Fügt die angegebene Zeile in die Fußzeilen jeder gedruckten Seite ein

Sub MyFooter()
	Dim xTxt As String
	Dim xAddress As String
	Dim xRg As Range
	Dim xCell As Range
	On Error Resume Next
	xAddress = ActiveWindow.RangeSelection.Address
	Set xRg  = Application.InputBox("Select the row you will insert repeatedly at the bottom:", "Kutools for Excel", xAddress, , , , , 8)
	If xRg Is Nothing Then Exit Sub
		For Each xCell In xRg
			xTxt = xTxt & xCell.Value & " "
		Next
		ActiveSheet.PageSetup.LeftFooter = xTxt
	End Sub

3. Drücken Sie die Taste F5 Schlüssel zum Ausführen des Codes. Anschließend wird ein Kutools für Excel-Dialogfeld angezeigt. Wählen Sie die Zeile, die Sie am Ende jeder gedruckten Seite drucken möchten, mehrmals aus und klicken Sie dann auf OK klicken.

Jetzt wird der angegebene Zeileninhalt der Fußzeile jeder gedruckten Seite im aktuellen Arbeitsblatt hinzugefügt. Sie können das Arbeitsblatt drucken.

TextWenn Sie den ausgewählten Inhalt wiederholt am Ende jeder Seite innerhalb der gesamten Arbeitsmappe drucken möchten, können Sie die Fußzeilenfunktion anwenden, um den Inhalt in die Fußzeile aller Blätter einzufügen.


Sie interessieren sich für:

Wiederholen Sie leicht Titelzeilen in jeder n-ten Zeile in Excel

Kutools for Excel's Titelzeilen einfügen Das Dienstprogramm kann Titelzeile vor jeder n-ten Zeile in einem ausgewählten Bereich in Excel schnell einfügen.

Kutools for Excel enthält mehr als 300 praktische Excel-Tools. Kostenlos zu testen, ohne Einschränkung in 60 Tagen. Mehr Laden Sie jetzt die kostenlose Testversion herunter


Kutools for Excel - Das beste Office-Produktivitäts-Tool Steigern Sie Ihre Produktivität um 80%

  • Wiederverwendung: Schnell einlegen komplexe Formeln, Diagramme und alles, was du vorher benutzt hast; Zellen verschlüsseln mit Passwort; Mailingliste erstellen und E-Mails senden ...
  • Super Formula Bar (Bearbeiten Sie mühelos mehrere Textzeilen und Formeln); Layout lesen (Leichtes Lesen und Bearbeiten einer großen Anzahl von Zellen); In gefilterten Bereich einfügen...
  • Zellen / Zeilen / Spalten zusammenführen ohne Daten zu verlieren; Inhalt der Zellen teilen; Kombinieren Sie doppelte Zeilen / Spalten... Doppelte Zellen verhindern; Bereiche vergleichen...
  • Wählen Sie "Duplizieren" oder "Eindeutig" Reihen; Wählen Sie Leere Zeilen (alle Zellen sind leer); Super Find und Fuzzy Find in vielen Arbeitsmappen; Zufallsauswahl ...
  • Exakte Kopie Mehrere Zellen ohne Änderung der Formelreferenz; Referenzen automatisch erstellen auf mehrere Blätter; Bullets einfügen, Kontrollkästchen und mehr ...
  • Extract Text, Text hinzufügen, Nach Position entfernen, Leerzeichen entfernen; Erstellen und Drucken von Paging-Zwischensummen; Zwischen Zelleninhalt und Kommentaren konvertieren...
  • Superfilter (Speichere und wende Filterschemata auf andere Blätter an); Erweiterte Sortierung nach Monat / Woche / Tag, Häufigkeit und mehr; Spezialfilter fett, kursiv ...
  • Arbeitsmappen und Arbeitsblätter kombinieren; Zusammenführen von Tabellen basierend auf Schlüsselspalten; Daten in mehrere Blätter aufteilen; Stapelkonvertierung von xls, xlsx und PDF...
  • Mehr als 300 leistungsstarke Funktionen. Unterstützt Office / Excel 2007-2019 und 365. Unterstützt alle Sprachen. Einfache Bereitstellung in Ihrem Unternehmen oder Ihrer Organisation. Kostenlose 60-Testversion für alle Funktionen.
Registerkarte Tab 201905

Registerkarte "Office" Bringt die Benutzeroberfläche mit Registerkarten in Office und vereinfacht Ihre Arbeit erheblich

  • Aktivieren Sie das Bearbeiten und Lesen von Registerkarten in Word, Excel und PowerPoint, Publisher, Access, Visio und Project.
  • Öffnen und erstellen Sie mehrere Dokumente in neuen Registerkarten desselben Fensters und nicht in neuen Fenstern.
  • Steigert Ihre Produktivität um 50% und reduziert täglich Hunderte von Mausklicks für Sie!
officetab unten
Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    Tim · 3 months ago
    Hi,

    I've been trying to use the above code but when I try to print te code it doesn't work. I followed all above steps and it doesn't give me any errors.
    I'm using office 365. Any tips ?

    Thanks in advance,
    • To post as a guest, your comment is unpublished.
      crystal · 23 days ago
      Hi Tim,
      Hi, the selected row will be inserted into the page footer, you need to switch to the Page Layout view to check for the result. Thank you for your comment.
  • To post as a guest, your comment is unpublished.
    Tim · 3 months ago
    Hi,

    When I start the macro and select the wished rows it doesn't work when I try to print. What can this be?
    Using office 365.

    Thanks,
  • To post as a guest, your comment is unpublished.
    SVazquez · 4 months ago
    Hi,
    I am trying a few times but it's not working. Please advise.
    • To post as a guest, your comment is unpublished.
      crystal · 3 months ago
      Good day,
      Thank you for your comment. Which Office version do you use?
  • To post as a guest, your comment is unpublished.
    Shakeel Rao · 1 years ago
    Thank you So Muchhhh...
    It helped me very much.
  • To post as a guest, your comment is unpublished.
    vijay · 2 years ago
    Thanks for sharing.

    is any possibility of VBA code to repeated footer same as with "print titles" option including lines and auto page number.

    if possible please help me.
  • To post as a guest, your comment is unpublished.
    Vamsi · 2 years ago
    Thanks for sharing the macro to repeat the rows at the bottom of the page.

    Can this Macro be modified to Repeat selected Rows with the format as well..
    In the provided Macro only Values are repeated at the bottom of each page, I am looking forward to copy the format as well at the bottom of the page..
  • To post as a guest, your comment is unpublished.
    Prayerson Khristi · 2 years ago
    Thanks a lot.

    This macro serves my purpose,

    Thanks to the creator and the person who had shared Macro
  • To post as a guest, your comment is unpublished.
    Prayerson Khristi · 2 years ago
    Thanks for Macro sharing. It serves my purpose. Thanks a lot.