neu
This commit is contained in:
@@ -15,7 +15,7 @@ Public Class cGenWord
|
||||
Dim odoc As Microsoft.Office.Interop.Word.Document
|
||||
Try
|
||||
oWord.Visible = visibleWord 'Word sehen zum Test?
|
||||
' MsgBox(pfadWord)
|
||||
' MsgBox(pfadWord)
|
||||
odoc = oWord.Documents.Open(pfadWord)
|
||||
odoc.SaveAs(tmpPath)
|
||||
odoc.Activate()
|
||||
|
||||
Reference in New Issue
Block a user