Този урок ще обясни какво е препратка и как да ги използвате в редактора на VBA
Ако работите в Excel VBA и искате да работите с Обекти, налични в друго приложение - като Microsoft Word например, трябва да добавите препратка към библиотеката на обекти на това приложение.
Добавяне на препратка към вашия VBA проект
В прозореца VBE щракнете върху Инструменти меню и след това щракнете върху Препратки…
Превъртете надолу през списъка с препратки, за да намерите този, който искате да използвате. В този случай обектната библиотека на Microsoft Word 16.0.
Щракнете ДОБРЕ.
Преглед на библиотеката с обекти
След като добавите препратка към базата данни, можете да използвате обектите, свързани с приложението, към което сте се позовали. The ОБЕКТНА БИБЛИОТЕКА за това конкретно приложение вече можете да използвате в Excel.
Кликнете върху Браузър на обекти бутон на Стандартен лентата с инструменти.
ИЛИ
Кликнете върху Изглед меню и изберете Браузър на обекти.
Изберете Word от падащия списък
Вече ще можете да видите всички обекти, както и техните методи и свойства, които вече можете да използвате във вашия код на Excel VBA.
Използване на справка в процедура на Excel
След като създадете препратка, можете да използвате обектите от библиотеката на обекти във вашия VBA код в Excel. Процедурата по -долу ще създаде нов документ на Word и ще направи Word видим на екрана ви.
| 123456789101112 | Sub CreateWordDocument ()Затъмнете wdApp като Word.ApplicationЗатъмнете wdDoc като Word.Document„отворена думаЗадайте wdApp = Ново Word.Application'създайте документЗадайте wdDoc = wdApp.Documents.Add'напиши някои нещаwdApp.Selection.TypeText "Добро утро Мелани!"'покажете дума на екранаwdApp.Visible = ВярноEnd Sub |
Ранно срещу късно свързване
Добавянето на препратка към обектна библиотека във вашия проект е известно като Ранно свързване. Това прави всички обекти от тази библиотека на обекти достъпни за използване програмно във вашия VBA проект. Тъй като вече сте добавили препратка към библиотеката на обекти на Microsoft Word в горната процедура, ние можем да препратим директно към Word приложението и Word документа, когато декларираме променливите wdApp и wdDoc, като използваме Ново метод.
Все пак можете да използвате библиотеката на обекти на друго приложение, без да добавяте препратка към нея във вашия код. Ще трябва да декларирате променливите wdApp и wdDoc като обекти и след това ще трябва да използвате CreateObject метод, а не Ново метод за създаване на нов екземпляр на Microsoft Word.
| 123456789101112 | Sub CreateWordDocument ()Затъмнете wdApp като обектЗатъмнете wdDoc като обект„отворена думаЗадайте wdApp = CreateObject ("Word.Application")'създайте документЗадайте wdDoc = wdApp.Documents.Add'въведете текстwdApp.Selection.TypeText Text: = "Добро утро Мелани!"'покажете дума на екранаwdApp.Visible = ВярноEnd Sub |
Използването на късно свързване е полезно, ако създадената от вас програма ще се използва на множество машини. Ако потребителят има различна версия на Microsoft Office от вас, той може да няма правилния файл на компютъра си за библиотеката на обектите. Например, ако използвате Excel версия 16, но те използват Excel версия 15, те могат да завършат с липсваща справка.
Можете лесно да поправите това, като премахнете отметката до липсващата препратка и след това превъртете надолу, за да намерите правилната препратка, и вместо това поставете отметка.
