20210518-2

This commit is contained in:
2021-05-18 13:53:20 +02:00
parent 278669ede2
commit 3848dca67f
34 changed files with 2 additions and 2 deletions

View File

@@ -263,7 +263,7 @@ Public Class frmtextmarken
StartWord(True)
objword.Documents.Open(dokumentname)
objdoc = objword.ActiveDocument
sbdokumentname = objdoc.Name
If visible = True Then sbdokumentname = objdoc.Name
objword.Visible = visible
objword.WindowState = Microsoft.Office.Interop.Word.WdWindowState.wdWindowStateMaximize
End Sub