Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1684to1688
1684to1688
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

"Fehlende" Spalte nach PDF Export

Forumthread: "Fehlende" Spalte nach PDF Export

"Fehlende" Spalte nach PDF Export
31.03.2019 22:03:53
swammcrusher
Guten Abend zusammen,
im Anhang hab ich ein Excel File mit Makros hochgeladen. In der Liste ist eine deutlich abgespeckte Version meiner Liste vorhanden, aber so funktioniert es auch. In der Liste sind auch zwei Makros dabei (Formatierung & Export).
https://www.herber.de/bbs/user/128796.xlsm
Wenn ich zuerst das Makro "Formatierung" ausführe wird die Liste dementsprechend formatiert. Danach führe die das Makro "Export" aus. Das offene Arbeitsblatt wird als PDF Datei exportiert (in den Pfad und unter dem Namen wie es im Makro steht).
Einzel funktioniert es, soweit so gut. Ich kam jetzt auf die Idee den Code von "Export" ganz unten an "Formatierung" anzufügen.
Wenn ich aber dann an der unbearbeiteten Liste das "komplette" Makro ausführe und mir die PDF anschaue, fehlt komischerweise die Spalte ganz rechts.
Hat jemand eine Idee woran das liegen könnte? Ich hab auch schon folgendes im "kompletten" Makro probiert, "Druckbereich festlegen" vor dem Code von "Export". Dies hat leider auch nichts gebracht.
Vorab vielen Dank für die Hilfe.
Mfg
Marco / swammcrusher
Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: "Fehlende" Spalte nach PDF Export
01.04.2019 09:14:22
Nepumuk
Hallo Marco,
leg den Druckbereich fest.
    'Seitenränder auf schmal umstellen
Application.PrintCommunication = False
With ActiveSheet.PageSetup
.PrintArea = "A1:I" & CStr(letzteZeile) '***************
.LeftMargin = Application.InchesToPoints(0.25)
.RightMargin = Application.InchesToPoints(0.25)
.TopMargin = Application.InchesToPoints(0.75)

Gruß
Nepumuk
Anzeige
AW: "Fehlende" Spalte nach PDF Export
01.04.2019 10:00:42
swammcrusher
Hey,
@Nepumuk, ich hab dies mal schnell ins Makro eingebaut und es dann komplett ausführen lassen.
Leider hat es nicht funktioniert. In der PDF fehlt wieder Spalte I, aber in der Excel Liste wird sie vom Druckbereich erfasst. Hab das gefühl das der Export gemacht wird wenn der Rest noch nicht fertig ist.
Mfg
Marco / swammcrusher
Anzeige
AW: "Fehlende" Spalte nach PDF Export
01.04.2019 10:19:41
Nepumuk
Hallo Marco,
ich würde auch die komplette Seitenformatierung am Ende des Makros machen.
Gruß
Nepumuk
AW: "Fehlende" Spalte nach PDF Export
01.04.2019 10:45:37
swammcrusher
Hey,
dies hat auch nicht funktioniert. Ich hab dann mal ein bisschen rumgespielt und habe "Application.PrintCommunication = True" gesetzt.
Siehe da es funktioniert. :D
Vielen Danke für die Hilfe.
Mfg
Marco / swammcrusher
Anzeige
;

Forumthreads zu verwandten Themen

Tabelle als PDF speichern
PeTeR

Hallo VBA-Freaks,
ich suche seit Stunden - finde aber nicht den exakt passenden Code, obwohl es zig Einträge zu dem Thema gibt.
Ich will eine Tabelle per VBA in PDF umwandeln u. drucken. Mein Code:
Application.ActivePrinter = "Adobe PDF auf Ne01:"
ActiveWindow.SelectedSheets.Pri...
25.10.2008 23:06:00
Thread-ID: 1019291
5 Beiträge
Mir fehlt der Ansatz: Mehrere Spalten & Zeilen
k

Hallo,
mir fehlt leider der Ansatz, bättere und google, komm aber nicht weiter ;o( Daher nun die Hoffnung, mir kann hier jemand einen Ansatz oder Link geben ?
Folgende Herausforderung:
Habe eine Tabelle mit ca. 30 Spalten, und möchte gern einen Email-Body so beschriften, dass alle B...
25.08.2009 15:24:00
Thread-ID: 1098436
4 Beiträge
Tabellenblatt als pdf und speichern
Horst

Hallo,
ich möchte über VBA ein Tabellenblatt als pdf speichern.
Momentan kann ich dank dem Makrorecorder ein pdf Dokument mit der BroadGun PDF Machine erstellen,
Acrobat Reader startet und zeigt das Dokument an.
Mein Wunsch wäre jedoch , dass das PDF Dokument auch gleich mit e...
27.11.2009 15:18:04
Thread-ID: 1120555
3 Beiträge
Excel Worksheet in PDF Datei umwandeln
Benedikt

hallo excel spezialisten
ich möchte gerne ein excel worksheet in eine pdf datei umwandeln, wie kann ich das machen?
das ganze sollte über einen makro möglich sein, denn ich möchte einen button dafür einsetzen (CommandButton1_Click), gleichzeitig möchte ich das sich die pdf datei automat...
28.02.2010 22:11:37
Thread-ID: 1142230
2 Beiträge
Blatt als PDF speichern (Excel 2007)
Gerhard

Hallo,
in einem gelegentlich langsamen Intranet muss ein Excel-Blatt von verschiedenen Netzwerk-PC aus mit diesem Code in einen vorhandenen oder neu erzeugten Ordner gespeichert werden.
Immer wieder kommt es vor, dass nicht in den mit If Dir(spath, 16) = "" Then MkDir (spath) erzeug...
10.03.2010 12:31:39
Thread-ID: 1144818
3 Beiträge
Anzeige
Blatt als PDF-Datei abspeichern
WalterK

Hallo,
in der Recherche habe ich einen Code gefunden mit dem Blätter als PDF-Datei gespeichert werden. Auf meine Bedürfnisse angepasst funktioniert er tadellos.
Eine kleine Änderung bekomme ich aber nicht hin.
Es geht um die Zeile sPDFName = "Arbeitszeitnachweis .....
MonatJahr...
16.07.2010 22:10:25
Thread-ID: 1167519
6 Beiträge
Excel als PDF speichern
max

Hallo Excelfreunde,
arbeite viel mit FreePDF XP, Nachteil: es öffnet sich eine Maske ausserhalb von Excel zum Zusammenfügen von Excelseiten und Abspeichern als Datei.
Vor kurzem habe ich im Archiv folgenden Makro gefunden (meinerseits bereits angepasst):
Sub Makro1() ActiveSheet.Exp...
29.02.2012 00:47:25
Thread-ID: 1252798
2 Beiträge
Exceltabelle in PDF umwandeln auf auf Desktop sp.
Thomas

Liebe VBA Freunde!
Ich stehe nur vor Problemen :-( und ich hoffe ihr könnt mir helfen!
Wie kann ich eine bestehende Exceltabelle Bereich A1:Q20 mit Hilfe VBA in ein PDF.File umwandeln
und auf den Desktop speichern?
Im Internet habe ich darüber leider nichts gefunden.
Gibt es...
20.06.2012 20:46:01
Thread-ID: 1268201
8 Beiträge
Excel als PDF mit Makro speichern
Wildgans

Hallo Forum,
ich habe mit dem Makrorecorder ein Makro aufgezeichnet, siehe Dokument https://www.herber.de/bbs/user/80794.doc
Wenn ich jetzt diese Makro starte funktionert es auch. Jetz möchte ich nur das bei der Ausgabe nicht drei einzelne Dateien erzeugt werden, sondern dass aus diese...
28.06.2012 10:48:17
Thread-ID: 1269286
3 Beiträge
mit vba html in pdf umwandeln
daniela

Hallo zusammen,
ich möchte die Website https://www.wmaccess.com/wmaccess/standard/wmaccess aufrufen aus einer Excel Datei heraus, in pdf umwandeln und dann unter I:\II_88\8\fm abspeichern mittels eines Makros.
Kann mir jmd. helfen?
Die Suche im Internet hat mich nicht weitergebrach...
05.09.2012 17:11:59
Thread-ID: 1277526
4 Beiträge
Daten suchen und als PDF exportieren
Peter

Guten Tag,
Habe mehrere Kundenlisten und Daten in verschiedenen sheets. Die selben Kunden kommen in allen Listen vor. Wollte fragen ob es möglich ist in excel nach einem Kunden zu suchen und excel spuckt alles über diesen einen Kunden aus verschiedenen sheets heraus.
Ideal wäre wenn man...
10.10.2012 15:05:38
Thread-ID: 1281358
3 Beiträge
Excel als PDF speichern
Meier

Hallo zusammen, ich benötige wohl wieder mal eure hilfe. Ich habe bereits ein bestehendes Makro, welches mir aus einem Excel-File verschiedene Files erstellt mit unterschhiedlichen Registern und immer den aktuellen Speicherort und Dateiname übernimmt.
Leider benötige ich jetzt das gleiche M...
05.12.2012 13:33:40
Thread-ID: 1289444
2 Beiträge
Anzeige
Anzeige

Infobox / Tutorial

Fehlende Spalte nach PDF Export in Excel

Schritt-für-Schritt-Anleitung

  1. Öffne Deine Excel-Datei: Stelle sicher, dass die Tabelle vollständig und korrekt ausgefüllt ist.

  2. Makros erstellen: Du benötigst zwei Makros – eins für die Formatierung und eins für den Export. Implementiere den folgenden VBA-Code für die Druckbereichsdefinition:

    Sub DruckbereichFestlegen()
   Dim letzteZeile As Long
   letzteZeile = Cells(Rows.Count, "A").End(xlUp).Row
   With ActiveSheet.PageSetup
       .PrintArea = "A1:I" & CStr(letzteZeile)
       .LeftMargin = Application.InchesToPoints(0.25)
       .RightMargin = Application.InchesToPoints(0.25)
       .TopMargin = Application.InchesToPoints(0.75)
   End With
End Sub

  3. Makro für den Export erstellen: Füge den Code zum Exportieren als PDF hinzu. Achte darauf, dass der Druckbereich vorher festgelegt wurde:

    Sub ExportierenAlsPDF()
   Call DruckbereichFestlegen
   ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:="DeinPfad\DeinDateiname.pdf"
End Sub

  4. Makros ausführen: Führe zuerst das Formatierungs-Makro und danach das Export-Makro aus.

  5. Überprüfen der PDF: Öffne die erzeugte PDF-Datei und überprüfe, ob alle Spalten korrekt dargestellt werden.

Häufige Fehler und Lösungen

  • Fehlende Spalte nach Export: Wenn eine Spalte fehlt, stelle sicher, dass der Druckbereich korrekt festgelegt ist. Überprüfe den Code und setze Application.PrintCommunication = True am Ende des Makros.

  • PDF wird falsch exportiert: Achte darauf, dass alle Formatierungen abgeschlossen sind, bevor du den Export durchführst.

  • Seitenformatierung nicht korrekt: Überprüfe die Seitenränder und die Seiteneinstellungen in den PageSetup-Optionen.

Alternative Methoden

  • Excel als PDF speichern ohne Makros: Du kannst auch manuell über Datei > Speichern unter > PDF speichern. Stelle sicher, dass der Druckbereich vorher festgelegt ist.

  • PDF konvertieren mit Online-Tools: Nutze Tools wie "pdf convert to excel", um eine Excel-Datei aus einer PDF zu erstellen. Dies kann hilfreich sein, wenn die Formatierung verloren gegangen ist.

Praktische Beispiele

  • Beispiel 1: Wenn Deine Tabelle Spalten A bis I enthält und Du nur die ersten 5 Spalten in die PDF exportieren möchtest, ändere den PrintArea:

    .PrintArea = "A1:E" & CStr(letzteZeile)

  • Beispiel 2: Um die PDF-Seitengröße anzupassen, kannst Du die Seitengröße im PageSetup definieren:

    .PaperSize = xlPaperA4

Tipps für Profis

  • Druckbereich ausblenden: Um bestimmte Spalten im Druckbereich auszublenden, kannst Du diese Spalten temporär ausblenden, bevor Du das PDF exportierst.

  • Benutzerdefinierte Formate: Experimentiere mit benutzerdefinierten Formatierungen für Deine Excel-Tabelle, bevor Du sie als PDF speicherst.

FAQ: Häufige Fragen

1. Warum fehlt eine Spalte nach dem Export?
Die Spalte könnte außerhalb des festgelegten Druckbereichs liegen. Stelle sicher, dass der Druckbereich alle gewünschten Spalten umfasst.

2. Wie kann ich die Seitengröße für den PDF-Export anpassen?
Du kannst die Seitengröße im PageSetup definieren, bevor Du den Export durchführst.

3. Gibt es eine Möglichkeit, mehrere Blätter gleichzeitig zu exportieren?
Ja, Du kannst eine Schleife verwenden, um durch alle Blätter zu iterieren und jedes als PDF zu exportieren.

4. Wie kann ich Excel in PDF umwandeln, ohne Formatierungen zu verlieren?
Achte darauf, dass alle Formatierungen abgeschlossen sind, bevor Du den Export durchführst und überprüfe den Druckbereich.

Beliebteste Forumthreads (12 Monate)

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