Compartilhar via

Propriedade TextFrame2.Creator (Office)

  • Artigo

Retorna um inteiro de 32 bits que indica o aplicativo no qual esse objeto foi criado. Somente leitura. Longo.

Sintaxe

expressão. Criador

Expressão Uma expressão que retorna um objeto TextFrame2 .

Exemplo

Este exemplo exibe uma mensagem sobre o criador de uma pasta de trabalho do Excel. Neste exemplo, o número hexadecimal 5843454C é equivalente à cadeia de caracteres XCEL, que indica que esse objeto foi criado no 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

Confira também

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.