Propriedade WebBrowserControl.Object (Access)
Use a propriedade Object no Visual Basic para retornar uma referência ao objeto ActiveX associado a um objeto OLE vinculado ou inserido em um controle. Usando essa referência, você pode acessar as propriedades ou chamar os métodos do objeto OLE. Somente leitura objeto.
Sintaxe
expressão. Objeto
Expressão Uma variável que representa um objeto WebBrowserControl .
Comentários
A propriedade Object retorna uma referência a um objeto ActiveX. Use a instrução Set para atribuir esse objeto ActiveX a uma variável de objeto. O tipo de referência de objeto retornado depende do aplicativo que criou o objeto OLE.
Quando você inserir ou vincula um objeto OLE em um formulário do Microsoft Access, você pode definir propriedades que determinam o tipo de objeto e o comportamento do controle no contêiner. No entanto, diretamente você não pode definir ou ler as propriedades do objeto OLE ou aplicar seus métodos, como você pode durante a execução de automação.
A propriedade Object retorna uma referência a um objeto de automação que representa o objeto OLE vinculado ou incorporado. Usando essa referência, você pode alterar o objeto OLE definindo ou ler suas propriedades ou aplicando seus métodos. Por exemplo, o Microsoft Excel é um componente COM que dá suporte à Automação. Se você inseriu uma planilha do Excel em um formulário access, poderá usar a propriedade Object para definir uma referência ao objeto Worksheet associado a essa planilha. Em seguida, você pode usar qualquer uma das propriedades e métodos do objeto Worksheet.
Para obter informações sobre quais propriedades e métodos um objeto ActiveX dá suporte, consulte a documentação do aplicativo que foi usado para criar o objeto OLE.
Exemplo
O exemplo a seguir utiliza a propriedade Object de um quadro de objeto não acoplado denominado OLE1. As informações de endereço e nome do cliente são inseridas em um documento incorporado do Microsoft Word formatado como uma carta modelo com marcadores para as informações de endereço e nome, e texto padrão no corpo da carta. O procedimento substitui as informações dos marcadores para cada registro e imprime a carta modelo. Ele não salva cópias da carta modelo impressa.
Sub PrintFormLetter_Click()
Dim objWord As Object
Dim strCustomer As String, strAddress As String
Dim strCity As String, strRegion As String
' Assign object property of control to variable.
Set objWord = Me!OLE1.Object.Application.Wordbasic
' Assign customer address to variables.
strCustomer = Me!CompanyName
strAddress = Me!Address
strCity = Me!City & ", "
If Not IsNull(Me!Region) Then
strRegion = Me!Region
Else
strRegion = Me!Country
End If
' Activate ActiveX control.
Me!OLE1.Action = acOLEActivate
With objWord
.StartOfDocument
' Go to first placeholder.
.LineDown 2
' Highlight placeholder text.
.EndOfLine 1
' Insert customer name.
.Insert strCustomer
' Go to next placeholder.
.LineDown
.StartOfLine
' Highlight placeholder text.
.EndOfLine 1
' Insert address.
.Insert strAddress
' Go to last placeholder.
.LineDown
.StartOfLine
' Highlight placeholder text.
.EndOfLine 1
' Insert City and Region.
.Insert strCity & strRegion
.FilePrint
.FileClose
End With
Set objWord = Nothing
End Sub
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.