Свойство Range.Count (Excel)

Возвращает значение Long , представляющее количество объектов в коллекции.

Синтаксис

expression. Считать

выражение: переменная, представляющая объект Range.

Замечания

Свойство Count функционально совпадает со свойством CountLarge , за исключением того, что свойство Count создаст ошибку переполнения, если указанный диапазон содержит более 2 147 483 647 ячеек (один менее 2048 столбцов). Однако свойство CountLarge может обрабатывать диапазоны до максимального размера листа, который составляет 17 179 869 184 ячейки.

Пример

В этом примере отображается количество столбцов в выделенном фрагменте на листе Sheet1. Код также проверяет выбор нескольких областей. Если она существует, код циклит по областям выбора нескольких областей.

Sub DisplayColumnCount() 
    Dim iAreaCount As Integer 
    Dim i As Integer 
 
    Worksheets("Sheet1").Activate 
    iAreaCount = Selection.Areas.Count 
 
    If iAreaCount <= 1 Then 
        MsgBox "The selection contains " & Selection.Columns.Count & " columns." 
    Else 
        For i = 1 To iAreaCount 
            MsgBox "Area " & i & " of the selection contains " & _ 
            Selection.Areas(i).Columns.Count & " columns." 
        Next i 
    End If 
End Sub

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

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