Propriedade Control.Object (Access)

Utilize a propriedade Objeto no Visual Basic para devolver uma referência ao objeto ActiveX associado a um objeto OLE ligado ou incorporado num controlo. 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 De controlo .

Comentários

A propriedade Object retorna uma referência a um objeto ActiveX. Utilize a instrução Set para atribuir este 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 suporta a Automatização. Se tiver incorporado uma folha de cálculo do Excel num formulário do Access, pode utilizar a propriedade Objeto para definir uma referência ao objeto folha de cálculo associado a essa folha de cálculo. Em seguida, você pode usar qualquer uma das propriedades e métodos do objeto Worksheet.

Para obter informações sobre quais as propriedades e métodos suportados por um objeto ActiveX, veja a documentação da aplicação que foi utilizada 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.