Thema Datum  Von Nutzer Rating
Antwort
Rot Mit VBA erstelltes PDF lässt sich nicht öffnen
 10.06.2016 12:25:16 oolf
NotSolved

Ansicht des Beitrags:
Von:
oolf		 Datum:
10.06.2016 12:25:16		 Views:
1245		 Rating:
     
Antwort:
  Ja
Thema:
Mit VBA erstelltes PDF lässt sich nicht öffnen

Hallo,

ich habe mit folgenden Code ein PDF erstellt, welches sich nicht öffnen lässt. Hat jemand eine Idee was ich falsch gemacht habe?
Es funktioniert eigentlich alles, PDF wird gespeichert, aber ich ich kann das erstellte pdf halt nicht öffnen?
Viele Grüße

oolf

Dim Word As Object
Dim strDatenQuelle As String
Dim WinDoc As Object
Const WD_STORY = 6

Dim strEnv As String
strPfad = "C:\Users\test\"




Set Word = CreateObject("Word.Application")
strDatenQuelle = "C:\Users\test\Export.xlsx"

Word.Visible = True

With Word
  Set WinDoc = Word.documents.Open("C:\Users\test\neu.docx")
    With WinDoc
        With .MailMerge
                .OpenDataSource Name:=strDatenQuelle, LinkToSource:=True, Format:=0, SQLStatement:="SELECT * FROM `Tabelle1$`"
                .Destination = 0
                .SuppressBlankLines = True
                    With .DataSource
                     '   .FirstRecord = wdDefaultFirstRecord
                       ' .LastRecord = wdDefaultLastRecord
                    End With
                .Execute Pause:=False
              
        End With
    End With
  Set docSerienbrief = .documents(1)
 .documents(1).Activate
  
    WinDoc.Close False
      .Selection.WholeStory
      .Selection.Fields.Update
      .Selection.HomeKey Unit:=WD_STORY
.documents(1).SaveAs2 Filename:=strPfad & "Anschreiben.pdf", FileFormat:=wdFormatPDF

.documents(1).Close SaveChanges = False

 
  
  End With
  

   
    
    End Sub

 

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 Mit VBA erstelltes PDF lässt sich nicht öffnen
 10.06.2016 12:25:16 oolf
NotSolved