共用方式為

Worksheet.Range 屬性 (Excel)

  • 發行項

會傳回代表儲存格或儲存格範圍的 Range 物件。

語法

運算式。Range (Cell1、 Cell2)

表達 代表 Worksheet 物件的 變數。

參數

名稱 必要/選用 資料類型 描述
Cell1 必要 Variant 字串，使用一個引數時的範圍參照。 可能是代表範圍參照的字串，或是使用兩個引數時的 Range 物件。
Cell2 選用 Variant 可能是代表範圍參照的字串，或是 Range 物件。 Cell2 會定義屬性所傳回範圍的另一個末端值。

備註

Cell1 與 Cell2 可以是巨集語言中的 A1 樣式參照。 範圍參照可以包含範圍運算子 (冒號)、交集運算子 (空格) 或聯集運算子 (逗號)。 也可以包含貨幣符號 (會遭到忽略)。 本機定義名稱可以是範圍參照。 如果使用名稱，則會假設該名稱使用的是巨集語言。

Cell1 與 Cell2 可以是 Range物件，其中可包含單一儲存格、欄、列或任何其他儲存格範圍。

Cell1 和Cell2通常是傳回範圍左上角和右下角的單一儲存格。

在沒有物件辨識符號的情況下使用時，此屬性是 ActiveSheet.Range 的快捷方式 (它會傳回使用中工作表的範圍;如果使用中工作表不是工作表，則屬性會) 失敗。

當此屬性套用於 Range 物件時，則此屬性是相對於 Range 物件而言。 例如，如果選取範圍是儲存格 C3，則 Selection.Range("B1") 會傳回儲存格 D3，因為它相對於Selection屬性所傳回的Range物件。 另一方面，程式碼 ActiveSheet.Range("B1") 一律會傳回儲存格 B1。

範例

這個範例會將 Sheet1 中 A1 儲存格的值設定為 3.14159。

Worksheets("Sheet1").Range("A1").Value = 3.14159

這個範例會在 Sheet1 的 A1 儲存格中建立公式。

Worksheets("Sheet1").Range("A1").Formula = "=10*RAND()"

本範例會在使用中活頁簿 Sheet1 的儲存格 A1：D10 上迴圈。 如果其中有一個儲存格的值小於 0.001，這段程式碼將用 0 (零) 來取代該值。

For Each c in Worksheets("Sheet1").Range("A1:D10") 
 If c.Value < .001 Then 
 c.Value = 0 
 End If 
Next c

本範例會在名為 TestRange 的範圍上執行迴圈，並顯示範圍中的空白儲存格數目。

numBlanks = 0 
For Each c In Range("TestRange") 
 If c.Value = "" Then 
 numBlanks = numBlanks + 1 
 End If 
Next c 
MsgBox "There are " & numBlanks & " empty cells in this range"

本範例會將使用中活頁簿 Sheet1 上儲存格 A1：C5 中的字型樣式設定為斜體。 在這個範例中，會使用 Range 屬性的語法 2。

With Worksheets("Sheet1")
	.Range(.Cells(1, 1), .Cells(5, 3)).Font.Italic = True
End With

此範例會比較 Worksheet.Range 屬性、 Application.Union 方法和 Application.Intersect 方法。

Range("A1:A10").Select                            'Selects cells A1 to A10.
Range(Range("A1"), Range("A10")).Select           'Selects cells A1 to A10.
 Range("A1, A10").Select                          'Selects cells A1 and A10.
Union(Range("A1"), Range("A10")).Select           'Selects cells A1 and A10.
 Range("A1:A5 A5:A10").Select                     'Selects cell A5.
Intersect(Range("A1:A5"), Range("A5:A10")).Select 'Selects cell A5.

支援和意見反應

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