Observação
O acesso a essa página exige autorização. Você pode tentar entrar ou alterar diretórios.
O acesso a essa página exige autorização. Você pode tentar alterar os diretórios.
Cria um objeto Automation da classe especificada.
Sintaxe
expression.
CreateObject( _ObjectName_ )
expressão Uma variável que representa um objeto Application.
Parâmetros
| Nome | Obrigatório/Opcional | Tipo de dados | Descrição |
|---|---|---|---|
| ObjectName | Obrigatório | String | O nome de classe do objeto a ser criado. Para obter informações sobre nomes de classe válidos, consulte Identificadores de programação OLE. |
Valor de retorno
Um valor objeto que representa a nova instância do objeto de automação. Se o aplicativo já estiver em execução, CreateObject criará uma nova instância.
Comentários
Este método é fornecido para que outros aplicativos podem ser automatizados do Microsoft Visual Basic Scripting Edition (VBScript) 1.0, que não incluiu um método CreateObject. CreateObject foi incluído no VBScript versão 2.0 e posteriores. Este método não deve ser usado para automatizar Microsoft Outlook do VBScript.
Observação
[!OBSERVAçãO] Os métodos de CreateObject normalmente usados no código de exemplo neste arquivo de Ajuda (disponível quando você clica em "Exemplo") são disponibilizados através do Microsoft Visual Basic ou Microsoft Visual Basic for Applications (VBA). Estes exemplos não utilizam o mesmo método CreateObject que é implementado como parte do modelo de objetos no Outlook.
Exemplo
Este exemplo de VBScript utiliza o evento Abrir do item para aceder à Internet do Windows Explorer e apresentar a página Web.
Sub Item_Open()
Set Web = CreateObject("InternetExplorer.Application")
Web.Visible = True
Web.Navigate "www.microsoft.com"
End Sub
Este exemplo do VBScript usa o evento Click de um controle CommandButton do item para acessar o Microsoft Word e abrir um documento no diretório raiz chamado "Resume".
Sub CommandButton1_Click()
Set Word = Application.CreateObject("Word.Application")
Word.Visible = True
Word.Documents.Open("C:\Resume.doc")
End Sub
Confira também
Suporte e comentários
Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.