Areas.Count プロパティ (Excel)

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

構文

式。カウント

式Areas オブジェクトを表す変数。

例

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