Export (0) Print
Expand All
Expand Minimize

Range.Count Property

Office 2007
Returns a Long value that represents the number of objects in the collection.

Syntax

expression.Count

expression   A variable that represents a Range object.

Example
This example displays the number of columns in the selection on Sheet1. The code also tests for a multiple-area selection; if one exists, the code loops on the areas of the multiple-area selection.

Visual Basic for Applications
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



Community Additions

ADD
Show:
© 2014 Microsoft