Partager via


Propriété TextFrame2.Creator (Office)

Renvoie un nombre entier de 32 bits qui indique l’application dans laquelle cet objet a été créé. En lecture seule. Long.

Syntaxe

expression. Créateur

Expression Expression qui renvoie un objet TextFrame2 .

Exemple

Cet exemple indique comment afficher un message relatif à l'application qui a créé un classeur Excel. Dans cet exemple, le nombre hexadécimal 5843454C équivaut à la chaîne XCEL, ce qui indique que cet objet a été créé dans Excel.

Sub FindCreator() 
 
 Dim myObject As Excel.Workbook 
 Set myObject = ActiveWorkbook 
 If myObject.TextFrame2.Creator = &h5843454c Then 
 MsgBox "This is a Microsoft Excel object." 
 Else 
 MsgBox "This is not a Microsoft Excel object." 
 End If 
 
End Sub 

Voir aussi

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.