Clever-Excel-Forum

Hallo, ich habe ein kleines Probelm  

ich möch ein geöffnetes Word-Dokument per VBA zu pdf konvertieren.

das klappt auch ganz gut:

Sub zu_pdf()
ActiveDocument.ExportAsFixedFormat OutputFileName:=("C:\DE\Bremen\Garden\Front Office\Module\Test\") & "Anschriftenänderung" & ".pdf", _
ExportFormat:=wdExportFormatPDF, _
OpenAfterExport:=True, OptimizeFor:=wdExportOptimizeForPrint, Range:= _
wdExportAllDocument, Item:=wdExportDocumentContent, _
IncludeDocProps:=True, KeepIRM:=True, CreateBookmarks:= _
wdExportCreateNoBookmarks, DocStructureTags:=True, _
BitmapMissingFonts:=True, UseISO19005_1:=False
ActiveDocument.Close

End Sub

ich möchte allerdings, das dieser Vorgang im Hintergrund abläuft, da heißt, das pdf.Dokument soll gar nicht geöffnet werden.

Als Alternative suche ich eine Möglichkeit das pdf.Dokument per vba zu schließen.


kann mir jemand weiter helfen?

Lieben Gruß Frank

Hallo Frank,

OpenAfterExport:=False

Gruß Uwe

Danke, das klappt super !

genauso wollte ich es haben.

Jetzt suche ich noch nach einer Möglichkeit das Word-Programm komplett zu beenden.

Dazu muß zuerst die noch offene Word-Datei angesteuert werden und dann Word beendet.

Hast du hierfür auch einen Tip?

Vielen Dank und Gruß Frank

Hallo Frank,

Application.Quit

als letzte Anweisung vor End Sub.

Gruß Uwe

Super,

vielen Danke Uwe, wieder ein Problem gelöst.

Lieben Gruß Frank

Hallo Uwe,

vieleicht kannst du mir auch hierbei helfen.

ich brauche eine Prüfung ob Word bereits gestartet ist oder nicht.

Wenn es gestartet ist, dann soll es geschlossen werden.
Wenn noch nicht geöffnet, dann soll nicht weiter passieren und das Programm weiterlaufen

Hallöchen,

im Prinzip reicht eine Zeile

If CreateObject("WScript.Shell").Run("taskkill /f /im Winword.Exe", 0, True) = 0 Then MsgBox "Word beendet" Else MsgBox "Word lief nicht"

Vielen Dank Andre,

klappt wunderbar.

Lieben Gruß Frank