次の方法で共有

Range.Count プロパティ (Excel)

  • [アーティクル]

コレクションに含まれるオブジェクトの数を表す長整数型 (Long) の値を返します。

構文

式。カウント

expression は Range オブジェクトを表す変数です。

注釈

Count プロパティは、CountLarge プロパティと機能的に同じですが、指定した範囲に 2,147,483,647 個を超えるセル (2,048 列未満) がある場合、Count プロパティはオーバーフロー エラーを生成します。 ただし、 CountLarge プロパティでは、ワークシートの最大サイズ (17,179,869,184 セル) までの範囲を処理できます。

例

次の使用例は、シート 1 で選択されているセル範囲の列数を表示します。 複数の領域が選択されている場合は、領域ごとに列数を数えて表示します。

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 のサポートおよびフィードバックを参照してください。