Excel) (Areas.Count 屬性

會傳回代表集合中物件數的 Long 值。

語法

運算式。計數

表達 代表 Areas 物件的變數。

範例

此範例會顯示 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 支援與意見反應。