Observação
O acesso a essa página exige autorização. Você pode tentar entrar ou alterar diretórios.
O acesso a essa página exige autorização. Você pode tentar alterar os diretórios.
Retorna um valor Boolean que indica se a célula especificada contém qualquer texto. Retorna True se a célula especificada contém texto. Somente leitura.
Sintaxe
expressão. HasText
expressão Uma variável que representa um objeto De célula .
Exemplo
Se a forma um na primeira página contiver uma tabela e a primeira célula da tabela contiver texto, este exemplo apresenta o texto numa caixa de mensagem.
With ActiveDocument.Pages(1).Shapes(1)
' Check for table.
If .HasTable Then
With .Table.Cells(StartRow:=1, StartColumn:=1, _
EndRow:=1, EndColumn:=1).Item(1)
' Check for text in first cell.
If .HasText Then
MsgBox "Text from first cell of table: " _
& vbCr & .Text
Else
MsgBox "No text in first cell."
End If
End With
Else
MsgBox "No table in shape one."
End If
End With
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.