Подскажите, пожалуйста, решение такой проблемы. Моя программа находит необходимые данные в документе Word и копирует их в Excel. Но если загружены и другие файлы Ворда, программа периодически путает с ними свой файл. Как программно загрузить новую копию Winword и открыть в ней нужный файл, чтобы открытые прежде файлы с ним не путались?
По сути нужен программный эквивалент ключа /n командной строки запуска Ворда.
Вот фрагмент моего кода. Что в нем не так?
По сути нужен программный эквивалент ключа /n командной строки запуска Ворда.
Вот фрагмент моего кода. Что в нем не так?
Код |
---|
Public appRef As New Word.Application Sub k1() Static docRef As Word.Document Set appRef = New Word.Application appRef.WindowState = wdWindowStateMaximize appRef.Visible = False Set docRef = Documents.Open(ThisWorkbook.Path & "\All-rev.doc", , True) With docRef .GrammarChecked = True .SpellingChecked = True .Activate If .ActiveWindow.View.SplitSpecial = wdPaneNone Then .ActiveWindow.ActivePane.View.Type = wdNormalView Else .ActiveWindow.View.Type = wdNormalView End If End With appRef.Options.Pagination = False 'etc..... End Sub |