Partager via


Propriété CustomControl.Object (Access)

Utilisez la propriété Object dans Visual Basic pour renvoyer une référence à l’objet ActiveX associé à un objet OLE lié ou incorporé dans un contrôle. À l'aide de cette référence, vous pouvez accéder aux propriétés ou invoquer les méthodes de l'objet OLE. En lecture seule Object.

Syntaxe

expression. Objet

Expression Variable qui représente un objet CustomControl .

Remarques

La propriété Object renvoie une référence à un objet ActiveX. Utilisez l’instruction Set pour affecter cet objet ActiveX à une variable objet. Le type de référence d'objet renvoyé dépend de l'application qui a créé l'objet OLE.

Lorsque vous incorporez ou liez un objet OLE dans un formulaire Microsoft Access, vous pouvez définir les propriétés qui déterminent le type d'objet et le comportement du contrôle conteneur. Toutefois, vous ne peut pas directement définir ou lire les propriétés de l'objet OLE ou appliquer ses méthodes, comme vous le feriez lors de l'exécution d'Automation.

La propriété Object renvoie une référence à un objet Automation qui représente l'objet OLE lié ou incorporé. À l'aide de cette référence, vous pouvez modifier l'objet OLE en définissant ou en lisant ses propriétés ou en appliquant ses méthodes. Par exemple, Microsoft Excel est un composant COM qui prend en charge Automation. Si vous avez incorporé une feuille de calcul Excel dans un formulaire Access, vous pouvez utiliser la propriété Object pour définir une référence à l’objet Worksheet associé à cette feuille de calcul. Vous pouvez ensuite utiliser les propriétés et méthodes de l'objet de feuille de calcul.

Pour plus d’informations sur les propriétés et méthodes prises en charge par un objet ActiveX, consultez la documentation de l’application utilisée pour créer l’objet OLE.

Exemple

L’exemple suivant utilise la propriété Object d’un frame d’objet indépendant nommé OLE1. Les informations relatives au nom et à l’adresse du client sont insérées dans un document Microsoft Word incorporé au format lettre avec des espaces réservés pour le nom et les informations d’adresse et le texte réutilisable dans le corps de la lettre. La procédure remplace les informations d’espace réservé pour chaque enregistrement et imprime la lettre de formulaire. Il n’enregistre pas les copies de la lettre imprimée.

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

Assistance et commentaires

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.