Live-Forum - Die aktuellen Beiträge
Datum
Titel
20.04.2024 08:56:18
Textbox in Tabellenblatt ohne Bestätigung in Zelle eintragen
20.04.2024 07:57:54
Tablle fürs E-Auto - Preis wenn kürzer als 60 Min Ladezeit
20.04.2024 00:49:19
Excel Sheet in einen Excel Kalender einfügen
20.04.2024 00:08:11
In Ordner nur das Speichern von Dateien erlauben
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
472to476
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
472to476
472to476
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

PDF Datei aus Excel drucken

PDF Datei aus Excel drucken
25.08.2004 21:14:45
Zwergel
Hallo,

ich habe hier im Forums-Archiv einen Beitrag gefunden, der ein ähnliches Problem beschreibt. Dort wird eine Downloaddatei aus dem web geladen und dann ausgedruckt.
Ich komme mit der Umsetzung des dortigen Codes nicht klar.
Wohin muß ich die Deklaration schreiben in meiner Datei und wohin kommt der andere Code (Diese Arbeitsmappe oder in normales Modul).
Hoffe, es kann jemand einen Tipp dazu geben.
Danke
Gruß :)
Michael

8
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: PDF Datei aus Excel drucken
25.08.2004 21:16:33
andre
Hallo Michael,
dann musst Du auch mal den Link zu dem Beitrag einstellen.
AW: PDF Datei aus Excel drucken
25.08.2004 21:37:55
andre
Hallo Michael,
mal zu dem zweiten Link:
1. in ein normales Modul
2. Aufpassen, hier wird der Code zerrissen. Private Declare ... ist i.O., Public Declare gehört auch in eine Zeile
3. Das mit dem Open wird angemosert, nimm mal DownPrint oder was anderes, was kein VBA-Befehl ist.
Anzeige
AW: PDF Datei aus Excel drucken
26.08.2004 13:09:49
Zwergel
Hallo Andre,
danke für den Hinweis.
Habe es jetzt mal so probiert und es klappt.
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 lpDirectory As String, ByVal nShowCmd As Long) As Long


Sub Drucken()
Product = "D:\Daten\Winword\Texte\DR allgGenehmigung AP-West.pdf"
ShellExecute 0, "Print", Product, "", "", SHOWMAXIMIZED
End Sub



Es bleibt jedoch das Adobe Programmfenster geöffnet. Hast Du noch einen Tipp, wie das Fenster am Ende geschlossen werden könnte?? Mit Parameter Close und Schließen ging es nicht.

Gruß

Michael
Anzeige
AW: PDF Datei aus Excel drucken
26.08.2004 18:35:54
andre
Hallo Michael,
mit geringen VBA-Kenntnissen wird das etwas kompliziert.
Schaue mal hier
http://www.activevb.de/tipps/vb6tipps/tipp0147.html
diesen Part
Private Sub Form_Load()
ersetzen mit
Private Sub Userform_initialize()
und hier
Task = Shell("notepad.ex e", vbNormalFocus)
muss ich erst mal testen, ob ich das
ShellExecute 0, "Print", Product, "", "", SHOWMAXIMIZED
reinbekomme...
AW: PDF Datei aus Excel drucken
26.08.2004 20:40:03
beat
Michael,
verwende in der ShellExecute - Zeile SW_HIDE und das Adobefenster geht nicht mal auf.
Gruss
Beat
Option Explicit
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 lpDirectory As String, ByVal nShowCmd As enShellExecuteShowCmd) As Long


Sub Drucken()
Dim Product As String
Product = "W:\rechnung_pdf\Kontrolle der Datensicherung.pdf"
ShellExecute 0, "Print", Product, "", "", SW_HIDE
Option Explicit
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 lpDirectory As String, ByVal nShowCmd As enShellExecuteShowCmd) As Long


Sub Drucken()
Dim Product As String
Product = "W:\rechnung_pdf\Kontrolle der Datensicherung.pdf"
ShellExecute 0, "Print", Product, "", "", SW_HIDE
End Sub
Anzeige
AW: PDF Datei aus Excel drucken
27.08.2004 19:42:12
Zwergel
Hallo Beat,
danke für den Tipp. Werde ich direkt am Montag mal testen.
Grüße und schönes Wochenende
Michael

184 Forumthreads zu ähnlichen Themen

als PDF drucken
KLE

Hallo und Guten Abend zusammen,
...jetzt habe ich meine Datei super hinbekommen - alles funktioniert und so, aber wie immer kommt mein Chef im Nachgang mit einem Sonderwunsch...und da komm ich ohne Eure Hilfe auch nicht weiter :o(
Ich habe es nun dank Eurer Unterstützung geschafft aus e...
25.09.2008 18:01:07
Thread-ID: 1012395
2 Beiträge
Anzeige
Makro: PDF-Drucken automatischer Dateiname
Stewie

Hallo,
ich habe ein Makro erstellt, mit welchem ich meine Tabellenblatt mittels PDF-Maker "drucken" kann.
Funktioniert soweit auch ganz gut, nur muss ich den Dateinamen noch von Hand eingeben.
Ich möchte gerne, dass mir der Text von 2 Zellen in meiner Tabelle als Dateiname benutzt w...
18.11.2008 11:14:00
Thread-ID: 1025556
3 Beiträge
PDF aus Intranet drucken
{Boris}

Hi Leute,
ich möchte aus Excel heraus PDF-Files drucken, die sich in unserem Intranet befinden.
Bisher kann ich sie mittels Hyperlink öffnen - muss dann aber noch manuell den Druck starten. Das möchte ich gerne vermeiden, zumal ich gerne mehrere Files ausdrucken möchte.
Ein klassisc...
05.01.2009 18:47:34
Thread-ID: 1037077
13 Beiträge
Anzeige
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
Alle pdf aus einem Ordner drúcken
Gerhard

Hallo zusammen,
ich habe mir folgendes Makro aus dem Forum genommen: Sub PrintPDF() Dim sPath$, i% sPath = "C:\Documents and Settings\gglatz\Desktop\NEWFOLDER\" With Application.FileSearch .NewSearch .LookIn = sPath .Filename = "*.*" .Execute Range("B2").Value = .FoundFiles.Count .NewSearch...
13.07.2009 12:51:43
Thread-ID: 1088158
4 Beiträge
pdf Dateien in einem Ordner drucken
Gerhard

Hallo zusammen,
ich habe folgendes Makro um alle pdf Dateien in einem Ordner zu drucken.
Der Druck und alles funktioniert wunderbar. Ich möchte jedoch, dass der Druck in auf- bzw. absteigender Reihenfolge passiert. Die pdf Dateien haben Namen wie
2100005897.pdf
2100005898.pdf
13.07.2009 15:58:37
Thread-ID: 1088238
4 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
PDF aus Exceldatei drucken
Beni

Hallo miteinander
Ich möchte mehrere PDF Dateien (ohne diese zu öffnen) per Command Button anhand der Pfadangabe in der Tabelle ausdrucken.
A1 = C:\Test\x.pdf
A2 = C:\Test\y.pdf
A3 = C:\Test\z.pdf
etc.
leider finde ich den Weg nicht alleine
Vielen Dank und ein schöne...
04.09.2009 14:19:10
Thread-ID: 1100634
7 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
1
2
12
13
2
3
3
13
6
1
1
4
2
5
1
3
4
1
5
8
6
4
10
2