Propriedade CanvasShapes.Count (Word)
Retorna um Long que representa o número de telas embutidas na coleção especificada. Somente leitura.
Sintaxe
expressão. Contar
expressão Obrigatório. Uma variável que representa um objeto CanvasShapes .
Exemplo
Este exemplo exibe o número de parágrafos do documento ativo.
MsgBox "The active document contains " & _
ActiveDocument.Paragraphs.Count & " paragraphs."
Este exemplo exibe o número de palavras da seleção.
If Selection.Words.Count >= 1 And _
Selection.Type <> wdSelectionIP Then
MsgBox "The selection contains " & Selection.Words.Count _
& " words."
End If
Este exemplo usa a matriz aFields() para armazenar os códigos de campos no documento ativo.
fcount = ActiveDocument.Fields.Count
If fcount >= 1 Then
ReDim aFields(fcount)
For Each aField In ActiveDocument.Fields
aFields(aField.Index) = aField.Code.Text
Next aField
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.