Remarque
L’accès à cette page nécessite une autorisation. Vous pouvez essayer de vous connecter ou de modifier des répertoires.
L’accès à cette page nécessite une autorisation. Vous pouvez essayer de modifier des répertoires.
Utilisez la propriété OLEType pour déterminer si un contrôle contient un objet OLE et, le cas échéant, si l’objet est lié ou incorporé. Type de données Octet en lecture-écriture.
Syntaxe
expression. OLEType
expression Variable qui représente un objet BoundObjectFrame .
Remarques
La propriété OLEType (TypeOLE) utilise les paramètres suivants.
| Setting | Constante | Description |
|---|---|---|
| Lié | acOLELinked | Le contrôle contient un objet lié. Toutes les données de l’objet sont gérées par l’application qui l’a créé. |
| Incorporé | acOLEEmbedded | Le contrôle contient un objet incorporé. Toutes les données de l’objet sont gérées par Microsoft Access. |
| Aucun | acOLENone | Le contrôle ne contient pas d'objet OLE. |
Lorsque vous créez un objet OLE, utilisez la propriété OLETypeAllowed (TypeOLEPermis) pour déterminer le type d'objet qu'un contrôle peut contenir.
Exemple
The following example illustrates how to display the Insert Object dialog box and how to display an error message if the Cancel button in the Insert Object dialog box is clicked.
Sub InsertObject_Click()
Dim conUserCancelled As Integer
' Error message returned when user cancels.
conUserCancelled = 2001
On Error GoTo ButtonErr
If OLE1.OLEType = acOLENone Then
' No OLE object created.
' Display Insert Object dialog box.
OLE1.Action = acOLEInsertObjDlg
End If
Exit Sub
ButtonErr:
If Err = conUserCancelled Then ' Display message.
MsgBox "You clicked the Cancel button; " _
& "no object was created."
End If
Resume Next
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.