Відкрийте документ Word
Цей макрос Word VBA відкриє документ Word із зазначеного каталогу:
Sub OpenDoc () Dim strFile As String strFile = "c: \ Users \ Nenad \ Desktop \ Test PM.docm" 'змінити шлях до вашого файлу If Dir (strFile) "" Тоді "Спочатку ми перевіримо, чи документ взагалі існує на дане розташування Документи. Відкрийте strFile End End If End Sub
Тепер ви можете взаємодіяти з нещодавно відкритим документом за допомогою об’єкта ActiveDocument. Цей код додасть деякий текст до документа.
ActiveDocument.Range (0, 0) .Text = "Додати текст"
Відкрити документ до змінної
Ви також можете відкрити документ Word, одразу призначивши його змінній:
Sub OpenDoc () Dim strFile As String Dim oDoc як Document strFile = "c: \ Users \ Nenad \ Desktop \ Test PM.docm" 'змінити шлях до вашого файлу If Dir (strFile) "" Тоді "Спочатку ми перевіримо, чи документ існує взагалі у певному місці Встановити oDoc = Документи. Відкрити strFile End End If End Sub
Дозволяє вам взаємодіяти з документом за допомогою змінної oDoc .:
oDoc.Range (0, 0) .Text = "Додати текст"
Як правило, найкраще відкрити змінну, що дає вам можливість легко посилатися на документ у будь -який момент.
Відкрийте документ Word з Excel
Ця процедура VBA відкриє документ Word з іншої програми MS Office (наприклад, Excel):
Sub OpenDocFromExcel () Dim wordapp Dim strFile As String strFile = "c: \ Users \ Nenad \ Desktop \ Test PM.docm" Встановити wordapp = CreateObject ("word.Application") wordapp.Documents.Open strFile wordapp.Visible = True End Підп