I'm pretty sure you have to open it, but you can open it as 'hidden' if you want.
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''' OPEN MS WORD
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
Public WordApp As New Word.Application
Public Doc As Word.Document
'
Public Sub OpenWord(vOpt)
WordApp.Documents.Open App.Path + "\POText.doc"
WordApp.Visible = False
Set Doc = WordApp.ActiveDocument
End Sub
(insert delete code)
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''' CLOSE MS WORD
'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
Public Sub CloseWord()
WordApp.ActiveDocument.Close (wdDoNotSaveChanges)
WordApp.Quit
Set Doc = Nothing
Set WordApp = Nothing
End Sub -----
The death of dogma is the birth of reason.
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.