Поделиться через

Свойство CanvasShapes.Count (Word)

  • Статья

Возвращает значение Long , представляющее количество фигур холста в указанной коллекции. Только для чтения.

Синтаксис

expression. Рассчитывать

выражение (обязательно). Переменная, представляющая объект CanvasShapes .

Пример

В этом примере отображается количество абзацев в активном документе.

MsgBox "The active document contains " & _ 
 ActiveDocument.Paragraphs.Count & " paragraphs."

В этом примере отображается количество слов в выделенном фрагменте.

If Selection.Words.Count >= 1 And _ 
 Selection.Type <> wdSelectionIP Then 
 MsgBox "The selection contains " & Selection.Words.Count _ 
 & " words." 
End If

В этом примере используется массив aFields() для хранения кодов полей в активном документе.

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

См. также

Коллекция CanvasShapes

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.