Excel) (Application.Rows 屬性

會傳回 Range 物件，代表使用中工作表上的所有資料列。 如果使用中檔不是工作表，則 Rows 屬性會失敗。 唯讀 Range 物件。

語法

運算式。行

expression 代表 Application 物件的變數。

註解

在不指定物件辨識符號的情況下使用此屬性，即等於使用 ActiveSheet.Rows。

當套用至多重選取範圍的 Range 物件時，這個屬性只會傳回範圍第一個區域中的資料列。 例如，如果 Range 物件有兩個區域—A1：B2 和 C3：D4，則 Selection.Rows.Count 會傳回 2，而不是 4。

若要對可能包含多重選取範圍的範圍使用此屬性，可測試 Areas.Count 以判斷該範圍是否為多重選取範圍。 如果確實是多重選取範圍，將會對該範圍內的每一個區域進行迴圈，如第三個範例所示。

範例

這個範例會刪除 Sheet1 中的第三列。

Worksheets("Sheet1").Rows(3).Delete

此範例檢查工作表一目前範圍中的列，如果某列的第一個儲存格值與前一列的第一個儲存格的值相等，則刪除此列。

For Each rw In Worksheets(1).Cells(1, 1).CurrentRegion.Rows 
 this = rw.Cells(1, 1).Value 
 If this = last Then rw.Delete 
 last = this 
Next

此範例顯示 Sheet1 指定範圍的列數。 如果是多重指定範圍，此範例將對每一個子範圍進行迴圈。

Worksheets("Sheet1").Activate 
areaCount = Selection.Areas.Count 
If areaCount <= 1 Then 
 MsgBox "The selection contains " & _ 
 Selection.Rows.Count & " rows." 
Else 
 i = 1 
 For Each a In Selection.Areas 
 MsgBox "Area " & i & " of the selection contains " & _ 
 a.Rows.Count & " rows." 
 i = i + 1 
 Next a 
End If

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎？ 如需取得支援服務並提供意見反應的相關指導，請參閱 Office VBA 支援與意見反應。