В свойстве Count
хранится число объектов
семейства. Обычно данное
свойство применяется, если
объект Range совместно
используется с семействами Rows
и Columns (рис. 10.6),
например:
Public Sub
countit ()
Dim
Counting As String
ActiveCell.CurrentRegion.Select
Counting = "Число ячеек = " &
Selection.Count
Counting = Counting & Chr(13) & "Число
строк = " & _
Selection.Rows.Count
Counting = Counting & Chr(13) & "Число
столбцов = "_
& Select
ion.Columns.Count
MsgBox Counting
End Sub
Рис. 10.6. Количество
строк и столбцов в диапазоне