Thema Datum  Von Nutzer Rating
Antwort
Rot VBA Excel -> PDF drucken auto. Dateiname vergeben
16.05.2012 06:44:51 frog91
NotSolved

Ansicht des Beitrags:
Von:
frog91
Datum:
16.05.2012 06:44:51
Views:
5523
Rating: Antwort:
  Ja
Thema:
VBA Excel -> PDF drucken auto. Dateiname vergeben

Hallo Leute!

Ich möchte mittels VBA aus einem Excel-Sheet eine PDF-Datei erzeugen.
Allerdings möchte ich den Dateinamen nicht jedes Mal eingeben sondern automatisch erzeugen lassen.

Das mit dem erstellen einer PDF-Datei funktioniert ja soweit allerdings gibt er mir nie meinen gewünschten Dateinamen ein.

hier mal mein code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
Public Sub Printing()
     
    Dim sPDFName As String
    Dim sPDFPath As String
 
    druck = "B2:J49"
     
    sPDFName = "test.pdf"
    sPDFPath = "D:\" & sPDFName
   
    Range(druck).Select
    ActiveSheet.PageSetup.PrintArea = druck
   
    Range("B2").Select
     
    On Error Resume Next
                           
    Application.ActivePrinter = "ScanSoft PDF Create! auf DocuCom PDF Port:"
     
    ActiveWindow.SelectedSheets.PrintOut _
    ActivePrinter:="ScanSoft PDF Create! auf DocuCom PDF Port:", _
    PrintToFile:=True, Collate:=True, PrToFileName:=sPDFPath
 
 
End Sub

Kann mir vll jemand sagen warum das programm, egal was ich in "PrToFileName:=" schreibe, immer den selben Datei namen vergibt? Es steht automatisch immer der Name der Excel-Datei im Feld Dateiname.

Danke im Voraus!

frog81


Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
Rot VBA Excel -> PDF drucken auto. Dateiname vergeben
16.05.2012 06:44:51 frog91
NotSolved