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

PDF erstellen und gleich drucken

Forumthread: PDF erstellen und gleich drucken

PDF erstellen und gleich drucken
21.07.2022 11:02:26
Pepi
Hallo zusammen
Ich habe ein Word (vermutlich gleich wie bei Excel), das ich als PDF speichere und dann das PDF gleich drucken will. (ev mit Druckerauswahl)
zB PDF-Datei.pdf.printout geht leider nicht
Leider gibt da der Makrorecorder keinen Code.
Auf dem Web habe ich auch nichts brauchbares gefunden.
Dank für eure Hilfe
lg Pepi
Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: PDF erstellen und gleich drucken
21.07.2022 11:44:54
Nepumuk
Hallo Pepi,
teste mal:

Option Explicit
Private Declare PtrSafe Function ShellExecuteA Lib "shell32.dll" ( _
ByVal hwnd As LongPtr, _
ByVal lpOperation As String, _
ByVal lpFile As String, _
ByVal lpParameters As String, _
ByVal lpDirectory As String, _
ByVal nShowCmd As Long) As LongPtr
Private Const SW_HIDE As Long = 0
Public Sub Test2()
Dim strOldPrinter As String, strNewPrinter As String
strOldPrinter = Application.ActivePrinter
If Application.Dialogs(xlDialogPrinterSetup).Show Then
strNewPrinter = Chr$(34) & Left$(Application.ActivePrinter, InStr(1, Application.ActivePrinter, "Auf", vbTextCompare) - 2) & Chr$(34)
Call ShellExecuteA(0, "PRINTTO", "G:\Eigene Dateien\Eigene PDF\ASCII-Tabelle.pdf", strNewPrinter, vbNullString, SW_HIDE)
Application.ActivePrinter = strOldPrinter
End If
End Sub
ich versteh allerdings nicht, warum du nicht einfach das Word-Dokument druckst.
Gruß
Nepumuk
Anzeige
AW: PDF erstellen und gleich drucken
21.07.2022 18:03:21
Pepi
Danke Nepumuk
Der Druckerdialog für Word habe ich dank deinem Script selber rausgefunden - geht aber nicht wenn PDF offen ist - kein Problem, mache ich halt CTRL + P
Ein PDF als Broschüe drucken ist viel einfacher als ein Word - deshalb dieser Aufwand.
geniesse zwischen durch auch den heissen Sommer nicht nur das kühle Bier am PC - smile
lg Pepi
Anzeige
;

Forumthreads zu verwandten Themen

bestimmte PDF-Seite ausdrucken
sepp

Hallo
habe aus dem Forum ein Programm zum Ausdrucken
von Pdf Dateien:
Public Product
Public Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" _ (ByVal hWnd As Long, ByVal lpOperation As String, _ ByVal lpFile As String, ByVal lpParameters As String, _ ByVal...
18.11.2008 20:15:18
Thread-ID: 1025777
3 Beiträge
VBA, PDF drucken und speichern
georg

Hallo liebe Excellenzen,
ich habe mich früher des öfteren im Spotlight Forum herumgetrieben. Leider fehlt mir heute die Zeit mich mehr einzubringen.
Hier bei Herber ist es mein erster Beitrag. Vielen Dank dafür dass es hier eine solche Plattform gibt!
Ich habe einen kleinen Server....
12.05.2009 13:23:15
Thread-ID: 1074578
3 Beiträge
pdf aus excel öffnen/drucken?
AndreasB

Guten Tag zusammen!
Ich habe eine Exceldatei mit mehreren Tabellenblättern. Jedes tabellenblatt
ist eine eigenes Kapitel einer statischen Berechnung. Zwischen 2 Kapiteln
müsste ich aber einmal ein pdf drucken.
Meine Frage: Kann ich in Excel irgend einen Verweis einfügen, der mir...
05.07.2009 18:29:11
Thread-ID: 1086483
6 Beiträge
VBA Makro erweitern um Funktion "als pdf drucken"
Sandra

Hallo zusammen,
ich hab da mal wieder eine Hürde die ich nicht alleine überwinden kann.
Ich habe ein Makro "bekommen", welches super funktioniert. Es bewirkt, dass die farbigen Markierungen erhalten bleiben, aber nicht auf dem Ausdruck erscheinen.
Nun soll aber der Druck nicht über...
04.08.2009 16:53:32
Thread-ID: 1093571
14 Beiträge
Blatt per VBA mit FreePDF als PDF-Datei sichern
Mike

Hallo,
wer kann mir einen Weg oder Beispiel zeigen, wie ich per VBA mit FreePDF ein Worksheet als PDF-Datei speichern kann?
Vielen Dank, Mike.
02.10.2009 00:05:48
Thread-ID: 1106727
5 Beiträge
VBA Datei speichern gleich wieder öffnen
Timonski

Servus
ich habe eine Exceldatei mit viel VBA und bei einem Tabellenblatt wird die Datei sehr langsam,
dann speicher ich und lad sie gleich wieder...
und diesen Befehl würde ich gern als Icon in der Symbolleiste hinterlegen...
hätte mir da einer einen Vorschlag?
vielen Dank
21.10.2009 09:36:11
Thread-ID: 1110986
4 Beiträge
Anzeige
tabelle per makro als pdf drucken ohne abfrage
Jens

hi leute
hab mal ne frage
ist es möglich die speicher abfrage vom pdf drucker zu umgehen?
ich möchte einen festen ordner vorgeben und die datei soll auch bei jedem druck überschrieben werden ohne nachfrage.
vielen dank im voraus
23.11.2009 08:59:36
Thread-ID: 1119332
3 Beiträge
Mit VBA Datei auf Server öffnen
egon.kernien@online.de

Hallo Experten!
Ich lasse mit diesem Code eine Exceldatei pda.xls die auf einem Server liegt so öffnen, Daten aus einer Tabelle lesen-kopieren, schliessen.:
ChDir Pfad
strFile = Application.GetOpenFilename
If strFile = "Falsch" Then Exit Sub
Set wbSource = Workbooks.Open(Fi...
03.12.2009 11:32:17
Thread-ID: 1121538
3 Beiträge
Spaten ausb. Drucken und PDF erzeugen
Thomas

Hallo Excelgemeinde,
ich bin schon lange am umschreiben meiner Mappe dran und komme nicht weiter. Mit diesem Code _
habe ich bisher gedruckt und die PDF erzeugt. Private Sub CommandButton5_Click() Dim ArrDruck() As String Dim i As Integer ArrDruck = Split("Abr.", ",") For i = 0 To UBo...
02.11.2010 07:21:28
Thread-ID: 1184771
10 Beiträge
vba Datei öffnen, Erweiterung unbekannt
Daniel

Hallo VBA - Experten,
Wie öffne ich in vba eine Exceldatei, ohne dass ich die Dateierweiterung kenne? Mein Problem: ich habe ein Makro erhalten, welches Dateien im Excel 2003 - Format öffnet. Das Öffnen sollte auch funktionieren, wenn die Dateien in einem neueren Format mit anderer Erweiter...
09.04.2011 16:16:22
Thread-ID: 1209733
4 Beiträge
Listboxeinträge öffnen und drucken
Volker

Guten Morgen zusammen,
Dank der Hilfestellung hier habe ich jetzt eine Listbox in welcher Arbeitsmappen die sich in in einem Ordner befinden aufgelistet werden.
Ich möchte die Einträge in der UserformListbox (.xls Dateien) nacheinander öffnen, drucken und wieder schließen.
Falls mög...
23.05.2011 10:17:49
Thread-ID: 1215573
4 Beiträge
Anzeige
PDF Dateien öffnen für Excel BS Vista
ropa

Hallo,
wir haben einen Laptop mit dem BS Vista.
Ich muß mit diesem des öfteren aus dem Internet PDF Dateien öffnen um Daten für Excel zu bekommen.
Wenn ich jetzt mit Firefox eine PDF Datei anklicke dann wird diese nicht geöffnet. Das speichern funktioniert jedoch aber das möchte ich...
27.06.2011 11:57:32
Thread-ID: 1219852
2 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

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