DoubleK,
Вот краткий пример установки связи новым документом Word
1.
2.
3.
4.
5.
6.
7.
8.
Dim WordAPP As Object
Dim WordDoc As Object
Dim WordTbl As Object
Set WordAPP = CreateObject("Word.Application") 'Типо указываем, что будем работать с вордом
Set WordDoc = WordAPP.Documents.Add 'Создаем новый документ (файлик) ворда естественно он еще не сохранен
Set WordTbl = WordDoc.Tables.Add(WordAPP.Selection.Range, 1, 5) ' В созданном файлике создаем таблицу размером 1*5
WordAPP.Visible = True 'Просим чтобы приложение стало видимым иначе без этой строки на экране ничего не произойдет зато в диспетчере задач будет видно что у нас висит открытый документ ворда
В переменную WordAPP устанавливаются все свойства самого приложения например:
1.
WordAPP.ActiveWindow.ActivePane.View.Zoom.Percentage = 150 ' устанавливает масштаб документа в 150%
Переменная WordDoc обладает свойствами самого документа (белый листик) обрати внимание, что таблица в документ добавляется как раз через WordDoc ибо вордовские таблицы принадлежат к класу документа а не к классу приложения
Переменная WordTbl создается для удобства и сокращения листинга кода то есть если в дальнейшем понадобится обратится к свойствам таблицы можно не писать WordDoc.Tables(1).Rows.Add (это добавляет новую строку в таблицу с индексом 1), а просто WordTbl .Rows.Add
Все переменные объявлены как объекты (As Object) то есть заранее на определенно с чем будем работать с воррдом или екселем или еще с чем ни будь и только в момент создания объекта уже указывается конкретно что объект будет являться вордовским приложением Word.Application - такой способ называется поздним связыванием в твоем случаи гораздо удобней пользоваться ранним связыванием:
1.
2.
3.
4.
5.
6.
7.
Dim WordAPP As Word.Application
Dim WordDoc As Word.Document
Dim WordTbl As Word.Table
Set WordAPP = New Word.Application
Set WordDoc = WordAPP.Document.Add
Set WordTbl = WordDoc.Tables.Add(WordAPP.Selection.Range, 1, 5) '
тогда ты сможешь видеть все свойства данного объекта
после того как ты поставишь точку в конце названия переменной: WordAPP. (здесь будет список доступных свойств)
Что бы использовать ранее связывание в редакторе VBA в меню:
Tools->References->Microsoft Word 11.0 Object Library (версия может отличатся например 14.0)
