Worksheet.Range-Eigenschaft (Excel)

Gibt ein Range-Objekt zurück, das eine Zelle oder einen Zellbereich darstellt.

Syntax

expression.Range (Cell1, Cell2)

expression: Eine Variable, die ein Worksheet-Objekt darstellt.

Parameter

Name	Erforderlich/Optional	Datentyp	Beschreibung
Cell1	Erforderlich	Variant	Ein String, bei dem es sich um einen Bereichsverweis handelt, wenn ein Argument verwendet wird. Entweder ein String, der eine Bereichsreferenz ist, oder ein Range-Objekt, wenn zwei Argumente verwendet werden.
Cell2	Optional	Variant	Entweder ein String, der eine Bereichsreferenz ist, oder ein Range-Objekt. Cell2 definiert eine andere Extremität des Bereichs, der von der Eigenschaft zurückgegeben wird.

Bemerkungen

Cell1 und Cell2 können A1-Stil-Referenzen in der Makrosprache sein. Die Bereichsverweise können den Bereichsoperator (ein Doppelpunkt), den Schnittmengenoperator (ein Leerzeichen) oder den Vereinigungsoperator (ein Komma) umfassen. Sie können auch Dollarzeichen enthalten, die ignoriert werden. Ein lokal definierter Name kann eine Bereichsreferenz sein. Bei diesem Namen wird davon ausgegangen, dass er in der Sprache des Makros vorliegt.

Cell1 und Cell2 können Range-Objekte sein, die eine einzelne Zelle, Spalte, Zeile oder einen anderen Zellbereich enthalten.

Oft sind Cell1 und Cell2 einzelne Zellen in der oberen linken und unteren rechten Ecke des zurückgegebenen Bereichs.

Bei Verwendung ohne einen Objektqualifizierer ist diese Eigenschaft eine Verknüpfung für ActiveSheet.Range (es wird ein Bereich aus dem aktiven Blatt zurückgegeben; wenn das aktive Blatt kein Arbeitsblatt ist, schlägt die Eigenschaft fehl).

Bei Anwendung auf ein Range-Objekt ist die Eigenschaft relativ zum Range-Objekt. Wenn die Auswahl beispielsweise Zelle C3 ist, gibt Selection.Range("B1") die Zelle D3 zurück, da sie relativ zum Range-Objekt ist, das von der Selection-Eigenschaft zurückgegeben wird. Dagegen gibt der Code ActiveSheet.Range("B1") immer die Zelle B1 zurück.

Beispiele

In diesem Beispiel wird der Wert von Zelle A1 auf Sheet1 auf 3,14159 festgelegt.

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

In diesem Beispiel wird in der Zelle A1 auf Sheet1 eine Formel erstellt.

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

Dieses Beispiel durchläuft die Zellen A1:D10 auf Sheet1 der aktiven Arbeitsmappe. Ist der Wert einer dieser Zellen kleiner als 0,001, wird er durch 0 ersetzt.

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

Dieses Beispiel durchläuft den Bereich mit dem Namen „TestRange“ und zeigt die Anzahl der leeren Zellen im Bereich an.

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"

In diesem Beispiel wird der Schriftschnitt in den Zellen A1:C5 auf Sheet1 der aktiven Arbeitsmappe auf Kursiv festgelegt. Das Beispiel verwendet Syntax 2 der Range-Eigenschaft.

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

In diesem Beispiel werden die Worksheet.Range-Eigenschaft, die Application.Union-Methode und die Application.Intersect-Methode verglichen.

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.

Support und Feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.