Live-Forum - Die aktuellen Beiträge
Datum
Titel
16.04.2024 09:22:11
Wenn Istleer über mehrere Blätter
15.04.2024 23:32:21
Darstellung im IMAGE sehr schlecht
15.04.2024 21:08:34
PDF mit Makro erstellen mehrere Sheets
15.04.2024 18:38:39
Arbeitszeiten Vorlage ergänzen
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
288to292
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
288to292
288to292
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Drucken/Seitenaufteilung mit VBA

Drucken/Seitenaufteilung mit VBA
08.08.2003 12:35:47
Uwe
Hallo Liste,
habe folgendes Problem. Eine Liste soll durch ein Makro ausgedruckt werden, am Ende jeder Druckseite soll eine Summe/Übertrag berechnet werden. Leider sind die Zellen nicht alle gleich hoch, wie kann ich das Seitenende mit VBA herausbekommen?
Herzlichen Dank im voraus
Uwe

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Drucken/Seitenaufteilung mit VBA
08.08.2003 13:05:36
Michael Schirow
Hi Uwe,
vielleicht hilft das weiter:

Sub testpagebreak()
Dim ws As Worksheet
Dim pb As HPageBreak
Set ws = ActiveWorkbook.Worksheets(1)
' Anzahl horizontale Seitenwechsel
MsgBox ws.HPageBreaks.Count
If ws.HPageBreaks.Count > 0 Then
' 1. Seitenwechsel pruefen
Set pb = ws.HPageBreaks(1)
' Typ des Seitenwechsels
' xlPageBreakAutomatic -4105
' xlPageBreakManual
' xlPageBreakNone
If pb.Type = xlPageBreakAutomatic Then
MsgBox "automatisch"
End If
' 1. Zelle auf neuer Seite
MsgBox pb.Location.Address
' Zeile absolut
MsgBox pb.Location.Row
End If
End Sub

HTH, Michael

Anzeige
AW: Drucken/Seitenaufteilung mit VBA
08.08.2003 13:16:42
Michael
Ich habe das gleiche Problem mit einem Add-In gelöst.Der Datei-Upload funktioniert leider nicht, aber schreib mir einfach ne email, dann kann ich dir das addin mit einer beispieldatei zuschicken ....

AW: Drucken/Seitenaufteilung mit VBA
08.08.2003 13:49:42
Uwe
Hi Michael,
wo finde ich deine eMail-Adresse? uwe@tappenbeck-net.de
p.s. testpagebreak bringt mich aber schon ein gutes Stück weiter.
Danke dafür
Uwe

AW: Drucken/Seitenaufteilung mit VBA
08.08.2003 13:54:10
Michael SChirow
Hi Uwe,
sorry, aber email-support leiste ich nur gegen Entgelt :-)
bleib einfach im Forum...
MfG, Michael

303 Forumthreads zu ähnlichen Themen

Zusammenfassung sheets auf einer Seite, ohne Leerz
gerdi

Hallo,
ich möchte aus verschiedenen Excel-Sheets (Tabs) eine Zusammenfassung
aller benutzten Zeilen haben.
Es gibt z.B. 10 verschiedene Tabellen, eine heißt Berlin, andere Rom, ect. und
auf jeder Tabelle sind zu verschiedenen Zeiten andere Inhalte.
Z.b. sind heute 10 Zeilen...
18.11.2008 14:36:00
Thread-ID: 1025647
3 Beiträge
Anzeige
Auf eine Seite drucken
Arnold

Hallo,
ich habe folgendes Problem:
Ich habe ein Tabellenblatt erstellt und will dieses über einen button ausdrucken.
Den Druckbereich habe ich wie folge definiert:
Private Sub CommandButton1_Click() Range("F9:P31").PrintPreview End Sub
Jetzt druckt er aber auf zwei Blätte...
29.11.2008 14:11:00
Thread-ID: 1028834
4 Beiträge
2 Sheets auf einer Seite!??
Timmy

Liebe Excler,
ich moechte folgendes erreichen.
Und zwar habe ich Daten auf einem Spreadsheet, die ich unabhaengig voneinander bearbeiten will.
Ich habe eine Beispieldatei angehaengt und etwas dazu erlautert...
https://www.herber.de/bbs/user/59047.xls
Ich hoffe, ich habe es...
03.02.2009 19:43:19
Thread-ID: 1046763
3 Beiträge
Anzeige
Spaltenüberschrift auf jeder Seite drucken
Pit

Hallo zusammen,
ich habe ein Problem mit der Spaltenüberschirft.
In meiner Excel - Tabelle habe ich Spaltenüberschriften (A1:K1) vergeben. Die Tabelle zieht sich über mehrere Seiten (es werden wohl ca. 100 Seiten werden). In Excel selbst habe ich mir die Spaltenüberschrift fixiert, so d...
03.03.2011 14:42:26
Thread-ID: 1204064
3 Beiträge
Jede Zeile auf einer Seite ausdrucken
Stef@n

Hallo Excel-Freunde
ich verzweifel weil ich nicht auf die Lösung komme.
Ich habe eine Datei in der 42 Zeilen enthalten sind
Spalte A Name - Spalte B Datum und eine Grafik
Die beiden Spalten sind so breit, daß der Name linksbündig, das Datum rechtsbündig
auf einer DinA4 Seite...
28.06.2012 21:48:44
Thread-ID: 1269376
4 Beiträge
Wie Dokumente auf möglichst wenig Seiten drucken?
Felix

Die Frage ist mir ja fast peinlich. Aber ich bin tatsächlich zu blöd, diese Tabelle auszudrucken:
https://www.herber.de/bbs/user/82623.xlsx
Zum einen habe ich das Problem, dass Excel meine Tabelle irgendwie nicht im Querformat drucken möchte, obwohl ich unter Seite einrichten auf Quer...
14.11.2012 15:11:58
Thread-ID: 1286640
3 Beiträge
gefilterte Pivottabellen auf einer Seite drucken
Hendrik

Hallo
ist es möglich, gefilterte Pivottabellen aus mehreren Tabellenblättern auf einer Seite anzuordnen, um die zu drucken?
Auf einer Seite ließen sich die verschiedenen Pivottabellen schwerlich direkt einbauen, da entweder riesige Zwischenräume entstehen würden (bei Filtern) oder aber...
02.09.2013 14:36:02
Thread-ID: 1329201
2 Beiträge
2 Druckbereiche auf einer Seite drucken
Armin

Hallo zusammen,
ich möchte gerne die Druckbereiche B1:F16 und B37:F46
auf einer Seite ausdrucken.
Bisher macht Excel immer 2 Seiten daraus.
Kennt jemand eine Lösung dafür?
Besten Dank für eure Hilfe
Armin
15.05.2014 12:54:03
Thread-ID: 1361745
4 Beiträge

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
2
2
3
2
4
2
3
2
1
3
9
2
4
1
1
1
2
3
3
2
2
2
2
1
4