Примечание.
Для доступа к этой странице требуется авторизация. Вы можете попробовать войти или изменить каталоги.
Для доступа к этой странице требуется авторизация. Вы можете попробовать изменить каталоги.
Создает объект автоматизации указанного класса.
Синтаксис
выражение.
CreateObject( _ObjectName_ )
выражение: переменная, представляющая объект Application.
Параметры
| Имя | Обязательный или необязательный | Тип данных | Описание |
|---|---|---|---|
| ObjectName | Обязательный | String | Имя класса создаваемого объекта. Сведения о допустимых именах классов см. в статье Программные идентификаторы OLE. |
Возвращаемое значение
Значение объекта, представляющее новый экземпляр объекта автоматизации. Если приложение уже запущено, CreateObject создаст новый экземпляр.
Примечания
Этот метод предоставляется для автоматизации других приложений из Microsoft Visual Basic Scripting Edition (VBScript) 1.0, в который не включен метод CreateObject . Функция CreateObject включена в язык сценариев VBScript версии 2.0 и более поздних. Этот метод не следует использовать для автоматизации Microsoft Outlook с помощью языка сценариев VBScript.
Примечание.
Методы CreateObject, обычно используемые в примере кода в этом файле справки (доступны при выборе пункта "Пример"), становятся доступными посредством Microsoft Visual Basic или Microsoft Visual Basic для приложений (VBA). В этих примерах не используется метод CreateObject , реализованный как часть объектной модели Outlook.
Пример
В этом примере языка сценариев VBScript для доступа к обозревателям Windows Internet и отображения веб-страницы используется событие "Открыть" элемента.
Sub Item_Open()
Set Web = CreateObject("InternetExplorer.Application")
Web.Visible = True
Web.Navigate "www.microsoft.com"
End Sub
В этом примере VBScript используется событие Click элемента управления CommandButton для доступа к Microsoft Word и открытия документа в корневом каталоге с именем "Resume.doc".
Sub CommandButton1_Click()
Set Word = Application.CreateObject("Word.Application")
Word.Visible = True
Word.Documents.Open("C:\Resume.doc")
End Sub
См. также
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.