Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Seitenzahl in Zelle anzeigen

Seitenzahl in Zelle anzeigen
14.09.2018 07:22:54
Sven
Hallo liebe Excel freunde
also ich habe ein problem welches mit sicherheit sehr einfach zu lösen ist jedoch komm ich imoment nicht wirklich weiter....
Ich habe eine Tabelle mit einer Wiederholungszeile (Zeile 1 bis 6) und möchte jetzt das in Zelle O3 die Seitenzahl da gestellt wird aber auch wirklich nur die Zahl also nicht Seite 1 oder Seite 1von sondern einfach nur 1 oder 2 und soweiter.
Ich habe =BLATT()versucht aber das funktioniert überhaupt nicht so wie ich möchte und in VBA habe ich auch schon den ein oder anderen versuch gemacht jedoch vergebens.
Ich würde mich sehr über einen Lösungsvorschag freuen
MFG SVEN
Anzeige

6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Seitenzahl in Zelle anzeigen
14.09.2018 09:16:55
daniel
Hi
die Funktion BLATT bezieht sich auf die Tabellenblattnummer des Bezugs, nicht die Seitenanzahl.
Generell ist es nicht möglich, in einer einzigen Zelle die Seitennummer der aktuell gedruckten Seite anzuzeigen, denn dazu müsste sich der Zellwert während des Ausdrucks ändern.
das einzige was mir einfallen würde, wäre folgender Workaround:
- lass dir die Seitennummer in der Kopfzeile anzeigen (vermutlich die rechte)
- positioniere jetzt über die Seitenränder und zusätzliche Leerzeichen im Kopfzeilentext diesen so, dass er in der Position erscheint, die auch die Zelle O3 hat (Kopf/Fusszeile und Tabellenblattinhalt können sich überlappen).
Gruß Daniel
Anzeige
AW: Seitenzahl in Zelle anzeigen
14.09.2018 09:19:35
Dieter(Drummer)
Hallo Sven,
in Zelle O3:
Rechte Maustaste: Namen Definieren
Unter Name: Seitenanzahl
Unter Bezieht sich auf: =Datei.Zuordnen(50)
OK
Nun in Zelle O3 Eingabe: =Seitenanzahl
Fertig.
Gruß, Dieter (Drummer)
AW: Seitenzahl in Zelle anzeigen
14.09.2018 18:28:35
Sven
Also das funktioniert nicht zu 100 % da die seitenzahl beim Druck auf jeder seite gleich ist!
ich möchte das sich die zahl der seite anpasst. Also Seite 1 gleich 1 und seite 2 die 2 und so weiter
Anzeige
AW: Seitenzahl in Zelle anzeigen
15.09.2018 08:54:27
Dieter(Drummer)
Hallo Sven,
da kann ich nicht weiter helfen, da müssen kreative Spezialisten ran.
Gruß,
Dieter(Drummer)
AW: Seitenzahl in Zelle anzeigen
15.09.2018 11:14:00
Daniel
wenn du jede seite einzenl ausdruckst, kannst du natürlich vorher die passende Seitennummer in die Zelle O3 schreiben.
mit VBA dann so:
Dim P As Long
For P = 1 To 10
Range("O3").Value = P
ActiveSheet.PrintOut From:=P, To:=P
Next
Gruß Daniel
Anzeige
AW: Seitenzahl in Zelle anzeigen
15.09.2018 19:25:11
Sven
Hallo lieber Daniel
Das funktioniert vielen Dank für deine Hilfe!
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige
Anzeige

Infobox / Tutorial

Seitenzahl in Zelle anzeigen


Schritt-für-Schritt-Anleitung

Um die Seitenzahl in einer Zelle anzuzeigen, kannst du folgende Schritte befolgen:

  1. VBA aktivieren: Du musst sicherstellen, dass Makros in deiner Excel-Datei aktiviert sind. Gehe dazu in die Excel-Optionen und aktiviere die Makros.

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

  3. Modul einfügen: Klicke mit der rechten Maustaste auf dein Projekt im Projekt-Explorer, wähle „Einfügen“ und dann „Modul“.

  4. Code einfügen: Kopiere den folgenden VBA-Code in das Modul:

    Dim P As Long
    For P = 1 To 10 'Anzahl der Seiten
        Range("O3").Value = P
        ActiveSheet.PrintOut From:=P, To:=P
    Next P
  5. Code ausführen: Schließe den VBA-Editor und führe das Makro aus, um die Seitenzahl in Zelle O3 anzuzeigen.


Häufige Fehler und Lösungen

  • Problem: Seitenzahl wird nicht aktualisiert.

    • Lösung: Stelle sicher, dass du das Makro richtig ausführst und dass alle Seiten korrekt definiert sind.
  • Problem: Fehlermeldung bei der Ausführung des Makros.

    • Lösung: Prüfe, ob du die richtigen Berechtigungen für die Ausführung von Makros in Excel hast.

Alternative Methoden

Falls du keine VBA-Lösungen nutzen möchtest, gibt es auch alternative Methoden, um die Seitenzahl anzuzeigen:

  • Kopf- oder Fußzeile nutzen: Du kannst die Seitenzahl in der Kopfzeile oder Fußzeile einfügen, indem du in Seitenlayout > Kopf- und Fußzeile gehst und die Option für die Seitenzahl wählst. Dies zeigt die Seitenzahl automatisch an, wenn du das Dokument druckst.

  • Namen definieren: Du kannst auch einen Namen für die Seitenanzahl definieren, indem du in Zelle O3 die Formel =Datei.Zuordnen(50) verwendest. Allerdings wird dies nicht die aktuelle Seitenzahl anzeigen, sondern einfach eine festgelegte Seitenanzahl.


Praktische Beispiele

Hier sind einige praktische Beispiele zur Verwendung der Seitenzahl in Zellen:

  1. Einfügen der Seitenzahl: Wenn du die Seitenzahl in Zelle O3 einfügen möchtest, kannst du den VBA-Code verwenden, um jede Seite einzeln zu drucken und dabei die aktuelle Seitenzahl zu aktualisieren.

  2. Kopfzeile anpassen: Wenn du die Kopfzeile anpassen möchtest, gehe zu Einfügen > Kopf- und Fußzeile und füge die Seitenzahl dort hinzu. So wird die Seitenzahl automatisch beim Druck aktualisiert.


Tipps für Profis

  • Automatische Seitenzahl: Wenn du eine automatische Seitenzahl in Zellen einfügen möchtest, können VBA-Makros sehr hilfreich sein. Diese können angepasst werden, um auch über mehrere Tabellenblätter hinweg zu arbeiten.

  • Seitenzahl formatieren: Du kannst die Formatierung der Seitenzahl anpassen, um sicherzustellen, dass sie deinen Anforderungen entspricht (z.B. „Seite 1 von 2“).

  • Testen der Druckansicht: Überprüfe die Druckansicht (Datei > Drucken), um sicherzustellen, dass die Seitenzahl korrekt angezeigt wird.


FAQ: Häufige Fragen

1. Wie kann ich die Seitenzahl in Zelle O3 automatisch aktualisieren? Du kannst VBA verwenden, um die Seitenzahl in Zelle O3 zu aktualisieren, wenn du das Dokument druckst. Siehe die Schritt-für-Schritt-Anleitung.

2. Ist es möglich, die Seitenzahl ohne Kopfzeile einzufügen? Ja, du kannst VBA verwenden, um die Seitenzahl direkt in eine Zelle einzufügen, ohne sie in der Kopfzeile anzuzeigen.

Beliebteste Forumthreads (12 Monate)

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