Live-Forum - Die aktuellen Beiträge
Datum
Titel
27.09.2025 15:11:53
Probleme mit dem Autovervollständigen
27.09.2025 13:16:54
Mit VBA erstellter S.-Brief erzeugt mehr Briefe als Daten
26.09.2025 22:18:24
Liste mit Links - tricky
26.09.2025 18:34:36
Welches Datum gibt mein M-Code aus?
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
884to888
884to888
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Automatisiertes Ausdrucken als PDF

Forumthread: Automatisiertes Ausdrucken als PDF

Automatisiertes Ausdrucken als PDF
10.07.2007 10:02:27
Horst
Hallo zusammen,
habe da so meine Probleme beim Drucken der monatlichen Personalberichte über einen PDF-Drucker.
Da ich jeden Monat unseren umfangreichen Personalbericht (aus ca. 15 Excel-Tabellen mit ca. 40 unterschiedlichen Tabellenblättern) als ein PDF-File ausdrucken soll, benötige ich Hilfe wie so etwas zu automatisieren ist.
Kann man dies evtl. über die Macro- VBA-Programmierung lösen?
Bin für jeden Vorschlag dankbar !!!
Horst

Anzeige

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Automatisiertes Ausdrucken als PDF
10.07.2007 10:46:00
Wolli
Hallo Horst, grundsätzlich ist makrogesteuertes Drucken auf einen bestimmten Drucker kein Problem. (Sheet("Tabelle").Printout) Wenn Du also eine immer gleiche Reihe von Blättern drucken willst, müsstest Du einfach die ganzen Druckbefehle hintereinander in ein Makro schreiben. Wenn das Deine Frage noch nicht beantwortet, solltest Du das Problem präzisieren: Wie gehst Du manuell vor? Welche Probleme hast Du heute damit?
Es dürfte aber nicht so einfach sein, mehrere PDFs zu einem PDF zusammenzufügen, zumindest nicht automatisch mit Excel.
Gruß, Wolli

Anzeige
AW: Automatisiertes Ausdrucken als PDF
10.07.2007 11:40:36
Horst
Hallo Wolli,
das Problem liegt in der Reihenfolge des Ausdrucks. Da die immer in der gleichen Reihenfolge liegen sollen, muß ich da höllisch aufpassen um die nicht durcheinander in das PDF-File zu bekommen.
Dachte ich hinterlege in meiner Kontrolltabelle (da ist hinterlegt wie der Status der einzelnen Tabelle in Bezug auf die Gesamtstatistik ist) eine Liste in der die File-/ und Tabellennamen liegen.
Nun wäre schön wenn ich dann evtl. über ein Makro diese Liste abarbeiten könnte und die Ausdrucke entsprechend in das PDF-File bekomme.
Da ich mich vom Wissensstand noch am Anfang der Macroprogrammierung befinde, wäre ich für ein etwas detaillierteres Beispiel wirklich sehr dankbar.
Ich arbeite zur Zeit mit dem PDF-Creator. Da kann man alle Drucke zu einem File zusammenfassen.
Vielen Dank, Horst

Anzeige
AW: Automatisiertes Ausdrucken als PDF
10.07.2007 14:20:00
Wolli
Hallo Horst, schau Dir mal das hier an.
https://www.herber.de/bbs/user/43999.xls
Es ist relativ simpel gestrickt: Gib untereinander die Dateien / Blätter an, die gedruckt werden sollen. Excel öffnet und schließt dann die Dateien und druckt sie aus. Probier's auf jeden Fall zunächst im Einzelschrittmodus (ein Schritt = F8 im Programmfenster) und schau, ob's geht. Mit dem Druckernamen im Code musst Du experimentieren, so dass Excel den richtigen Drucker wählt. Im Zweifelsfall den "ActivePrinter" rausnehmen und vorher den Standarddrucker umstellen. Die "Open" und "Print"-Befehle kann man übrigens noch erweitern. Drück F1, währende der Cursor auf dem Befehl steht und lies die Hilfe.
Bei Fragen - Fragen! Gruß, Wolli

Anzeige
AW: Automatisiertes Ausdrucken als PDF
10.07.2007 16:33:42
Horst
Hallo Wolli,
ist ja super !!!!!
klappt soweit prima, habe dazu noch die folgende Frage:
Wenn das Makro nun die Tabellen öffnet, fragt es immer nach dem aktualisieren der Tabelle. Die Antwort darauf lässt sich doch sicherlich ebenfalls automatisch beantworten ?
Kannst du mir noch bitte mitteilen wo ich was einfügen muß?
Vielen, vielen Dank !!!!!
Horst

Anzeige
AW: Automatisiertes Ausdrucken als PDF
10.07.2007 16:57:00
Wolli
Die Zeile sieht dann so aus: 

Workbooks.Open Filename:=Datei, UpdateLinks:=0 'Datei öffnen

Du kannst aber auch 1, 2 oder 3 wählen - s.u.
Gruß, Wolli
Aus der Excel-Hilfe:
UpdateLinks Optionaler Variant-Wert. Gibt an, wie Verknüpfungen in einer Datei aktualisiert werden. Wenn dieses Argument nicht angegeben ist, wird der Benutzer dazu aufgefordert, anzugeben, wie die Verknüpfungen aktualisiert werden sollen. Andernfalls hat dieses Argument einen der in der folgenden Tabelle aufgeführten Werte.
Wert Bedeutung
0 Keine Aktualisierung von Bezügen
1 Aktualisierung von externen Bezügen, jedoch nicht von Remotebezügen
2 Aktualisierung von Remotebezügen, jedoch nicht von externen Bezügen
3 Aktualisierung von externen Bezügen und Remotebezügen
Wenn Sie in Microsoft Excel eine Datei im WKS-, WK1- oder WK3-Format öffnen und das Argument UpdateLinks den Wert 2 hat, dann erstellt Microsoft Excel Diagramme aus den Grafiken, die der Datei angehängt sind. Wenn das Argument den Wert Null hat, werden keine Diagramme erstellt.

Anzeige
;

Forumthreads zu verwandten Themen

Mehrere Tabellenblätter zum pdf + mail
Christina

Hallo,
folgende Situation:
ich habe eine Excel-Datei mit mehreren Tabellenblättern mit Filialnummern benannt.
Ich benötige ein Makro, mit dessen Hilfe automatisch die ersten zehn Tabellenblätter einzeln angewählt werden, als pdf auf einem Laufwerk mit individuellen Dateinamen abges...
04.12.2013 16:33:15
Thread-ID: 1341232
3 Beiträge
Tabellenblatt als PDF-Seite drucken und speichern
Michael

Hallo zusammen,
habe folgendes Problem.
Habe Excel 2003 und Adobe Acrobat XI pro.
Mittels VBA möchte ich, dass das Tabellenblatt unter dem Namen in dem Ordner abgespeichert wird und die eventuell bereits vorhandene PDF-Datei ohne Rückfragen abspeichert.
Mein Code bisher laute...
16.05.2014 11:42:11
Thread-ID: 1361899
7 Beiträge
pdf-Druck einer Range über die ganze Seite
Linda

Hallo ihr Lieben!
Ich habe eine Frage zum Druck eines pdf-Dokuments. Ich benutze folgenden Code für eine Schaltfläche:
Range("C19:J35").ExportAsFixedFormat Type:=xlTypePDF, filename:= _
ThisWorkbook.Path & "\Diagramm 1.pdf", Quality:=xlQualityStandard _
, IncludeDocPropertie...
21.09.2016 13:18:01
Thread-ID: 1515572
2 Beiträge
Mehrere Tabellenblätter auf eine PDF-Seite
Werner

Hallo,
gibt es eine Möglichkeit mehrere Tabellenblätter auf eine PDF-Seite zusammenzufügen?
Bei meinem folgenden Code fängt er ja für jede Tabelle eine neue Seite an, obwohl mehrere auf eine Seite passen würden.
Sheets(Array("Quelle", "Rechnung", "Statistik")).Select ActiveSheet.Ex...
04.09.2019 10:54:49
Thread-ID: 1711117
3 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken

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