Propriedade InlineShape.HasSmartArt (Word)
Retorna True se não houver um diagrama SmartArt presente na forma. Somente leitura.
Sintaxe
expression. HasSmartArt
Expressão Uma variável que representa um objeto 'InlineShape'.
Exemplo
O exemplo de código a seguir mostra se a primeira forma embutida no documento ativo contém SmartArt ou não.
Dim myInlineShape As InlineShape
Set myInlineShape = ActiveDocument.InlineShapes(1)
If myInlineShape.HasSmartArt Then
MsgBox "The first shape contains SmartArt."
Else
MsgBox "The first shape contains no SmartArt."
End If
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.
Comentários
https://aka.ms/ContentUserFeedback.
Em breve: Ao longo de 2024, eliminaremos os problemas do GitHub como o mecanismo de comentários para conteúdo e o substituiremos por um novo sistema de comentários. Para obter mais informações, consulteEnviar e exibir comentários de