Live-Forum - Die aktuellen Beiträge
Datum
Titel
24.04.2024 00:20:14
Bestimmte Spalten als xls exportieren per Makro
23.04.2024 22:08:10
Auflisten in Spalte VBA
23.04.2024 21:33:46
Nur farbige/nicht farbige Zellen markieren
23.04.2024 21:29:56
Bestimmte Zellen auf andere Arbeitsblätter kopieren
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
200to204
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
200to204
200to204
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Anzahl der Seiten einer Tabelle

Anzahl der Seiten einer Tabelle
13.01.2003 17:05:36
Estfeller Anton
With ActiveSheet.PageSetup
.FitToPagesWide = 1
.FitToPagesTall = 52
.PrintErrors = xlPrintErrorsDisplayed
End With

ich möchte in dieser prozedur für die anweisung '.FitToPagesTall = 52' den wert (52) autmomatisch ermitteln lassen, da das zu druckenden dokument immer variable seitenlänge hat. wie muss ich eine eventuelle variable definieren um die letzte seite eines dokumentes auszulesen und diese variable dann an stelle von 52 einsetzen kann

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

Betreff
Datum
Anwender
Anzeige
Re: Anzahl der Seiten einer Tabelle
13.01.2003 17:13:18
Bernd Held
Hallo Anton,
über folgendes "Alt-Makro" kannst du die voraussichtlichen Druckseiten ermitteln:

Sub DruckseitenZählen()
MsgBox "Diese Tabelle enthält " & _
ExecuteExcel4Macro("Get.Document(50)") & " Druckseiten!"
End Sub

Viele Grüße
Bernd
MVP für Microsoft Excel
Neue VBA-Bücher, neue FAQs und Makros unter: http://held-office.de

Re: Anzahl der Seiten einer Tabelle
13.01.2003 17:31:33
Anton Estfeller
habe meinen kodex so umgeändert:

With ActiveSheet.PageSetup
.FitToPagesWide = 1
.FitToPagesTall = ExecuteExcel4Macro("Get.Document(50)")
.PrintErrors = xlPrintErrorsDisplayed
End With

und getestet - ich habe den eindruck es passt
danke für die rasche hilfe

gibt es sonst keine möglichkeit in excel die seitenanzahl, bzw. die letzte seite eines dokumentes festzulegen

Anzeige

304 Forumthreads zu ähnlichen Themen

mehrere Tabellenblätter in ein PDF drucken
Christian

Hallo zusammen,
nachdem ich im Forum keine Info zu meinem Thema gefunden habe:
Ich möchte mehrere Tabellenblätter einer Datei als PDF ausdrucken. Also markiere ich die Tabellenblätter und gehe wie gewohnt ins Menü "Drucken" (PDF über Acrobat 7.0 oder PDF XChange 4.0 Lite).
Leider we...
10.10.2008 09:11:00
Thread-ID: 1015503
2 Beiträge
Anzeige
TEXT in Tabelle umwandeln
Martin

Liebe Forumteilnehmer,
möchste aus einem TEXT in WORD der bestimmte wiederholte, standardisierte Abschnitte - in diesem fall Name, Vorname, Geb-Datum, eine Tabelle generieren. Geht das mit einem Makro aus Excel heraus?
Danke
Martin
02.02.2009 17:26:48
Thread-ID: 1046338
4 Beiträge
Umwandeln PIVOT-Tabelle in reguläre Datentabelle
Susi

Hallo liebe Excel-Freunde,
ich habe eine Pivot-Tabelle aus einer umfangreichen Datenmenge erstellt und das Datum nach Quartalen gruppiert. Diese Daten der neuen Pivot-Tabelle möchte ich nun weiterverwenden. Das Problem dabei ist, das ich die Werte der Pivot-Tabelle in eine neue reguläre Dat...
04.02.2009 12:03:00
Thread-ID: 1046976
5 Beiträge
Anzeige
Einzelnes Tabellnblatt in PDF Datei speichern
Jens

Ich habe folgendes Problem, ich möchte ein einzelnes Tabellenblatt aus Excel heraus in eine Pdf Datei mittels command Buttom und Makro/ VBA speichern. Als PDF Prog nutze ich Adobe Acrobat Prof 8.0(bringt nen Converter mit).
THX im Voraus
27.02.2009 15:30:50
Thread-ID: 1054824
14 Beiträge
Pdf in Excel umwandeln
Susann

Hallo,
ich habe ein PDF Dokument mit Adressdaten. Diese möchte ich in eine Excelliste wandeln, damit ich einen Serienbrief daraus machen kann.
Ich habe das PDF bereits als Text gespeichert, um es dann mit Tabs getrennt in Excel zu speichern und wieder zu öffnen. Da zeigt er allerdings...
27.04.2009 10:32:12
Thread-ID: 1071297
13 Beiträge
PDF-File als neues Tabellenblatt
StefanS

Hallo,
meine Vorgesetzten treiben mich noch in den Wahnsinn!!!!
Besteht generell die Möglichkeit per Hyperlink auf eine Pdf-Datei (z.B. in Sheet("Register_1")),
diese als neues Tabellenblatt (z.B. Sheet("Datenblatt")) einzufügen? Habe keine Ahnung, ob so etwas überhaupt mit Excel mö...
18.05.2009 15:42:00
Thread-ID: 1075923
3 Beiträge
Matrix in Tabelle umwandeln
Lutz

Hallo Forum,
ich habe eine Matrix, welche ich gerne in eine Tabelle umwandeln würde. Da es sich in echt um mehr als 1000 Einträge handelt, wäre es klasse, wenn auch die Spalten A und B der Ergebnistabelle automisch erzeugt werden würden.
Anbei mal eine Beispiel, welches ich händisch erz...
13.08.2009 01:24:21
Thread-ID: 1095446
10 Beiträge
Dateiname in Einzelbestandteile umwandeln
Axel

Hallo
ich habe folgendes Problem:
ich speichere eine Datei nach einer ganz bestimmten Syntax:
Projektnummer_Projektname_Dokument_1.xls
Wie kann ich aus dem abgespeicherten Namen (also aus activeworkbook.name) die einzelnen Bestandteile auslesen und als String wider ausgeben? (Sp...
24.08.2009 17:38:45
Thread-ID: 1098205
10 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
1
4
3
4
2
13
12
2
9
9
1
1
4
6
2
5
2
2
2
5
1
2
1
1
5