htm als Word Dokument speichern
26.05.2021 18:11:06
Oisse
wie kann ich ein in Word geöffnetes htm Dokument als Word Dokument abspeichern bzw. als pdf exportieren?
Das Erzeugen und auch das Öffnen des htm Dokuments in Word funktioniert.
Zum Öffnen, Speichern und Exportieren benutze ich folgenden Code:
Set WordObj = GetObject(, "Word.Application")
If WordObj Is Nothing Then
Set WordObj = CreateObject("Word.Application")
Else
End If
WordObj.Documents.Add (ThisWorkbook.Path & "\Organisation.htm")
WordObj.Visible = True
Const wdFormatXMLDocument As Integer = 12
WordObj.SaveAs2 Filename:=ThisWorkbook.Path & "\" & PDFName & ".docx", _
FileFormat:=wdFormatXMLDocument
WordObj.ExportAsFixedFormat outputfilename:=CDateiName, _
exportformat:=17, OpenAfterExport:=True, _
OptimizeFor:=0, Range:=0, Item:=0, IncludeDocProps:=True, KeepIRM:=True, _
CreateBookmarks:=0, DocStructureTags:=True, _
BitmapMissingFonts:=True, UseISO19005_1:=False
Vielleicht liegt´s daran, dass es ja ein htm Dokument ist und kein "richtiges" Word Dokument.
Ich habe in Word den Makrorekorder genommen.
Der schreibt am Anfang jedoch:
ActiveDocument.SaveAs2... was in Excel so nicht geht, deshalb habe ich es ersetzt mit WordObj.
Wie, bitte, speichere ich das htm ab bzw exportiere ich es?
Gruß Oisse