Auf Englisch lesen

Freigeben über


Areas-Objekt (Excel)

Eine Auflistung aller Bereiche oder zusammenhängender Zellblöcke innerhalb einer Markierung.

Hinweise

Es gibt kein einzelnes Area-Objekt . Einzelne Elemente der Areas-Auflistung sind Range-Objekte . Die Areas -Auflistung enthält ein Range -Objekt für jeden einzelnen zusammenhängenden Zellbereich in der Markierung. Wenn die Markierung nur einen Bereich enthält, verfügt die Areas-Auflistung über ein einzelnes Range-Objekt, das dieser Markierung entspricht.

Beispiel

Verwenden Sie die Areas-Eigenschaft des Range-Objekts , um die Areas-Auflistung zurückzugeben. Im folgenden Beispiel wird die aktuelle Markierung gelöscht, wenn diese mehrere Bereiche enthält.

If Selection.Areas.Count <> 1 Then Selection.Clear

Verwenden Sie Bereiche (Index), wobei index die Indexnummer des Bereichs ist, um ein einzelnes Range-Objekt aus der Auflistung zurückzugeben. Die Indexnummern entsprechen der Reihenfolge, in der die Bereiche ausgewählt wurden. Im folgenden Beispiel wird der erste Bereich in der aktuellen Auswahl gelöscht, wenn die Auswahl mehr als einen Bereich enthält.

If Selection.Areas.Count <> 1 Then 
 Selection.Areas(1).Clear 
End If

Einige Operationen können nicht auf mehreren Bereichen in einer Auswahl gleichzeitig ausgeführt werden; Sie müssen die einzelnen Bereiche in der Auswahl durchlaufen und die Vorgänge für jeden Bereich separat ausführen. Im folgenden Beispiel wird der Vorgang myOperation für den ausgewählten Bereich ausgeführt, wenn die Auswahl nur einen Bereich enthält. Wenn die Auswahl mehrere Bereiche enthält, führt das Beispiel myOperation für jeden einzelnen Bereich in der Auswahl aus.

Set rangeToUse = Selection 
If rangeToUse.Areas.Count = 1 Then 
 myOperation rangeToUse 
Else 
 For Each singleArea in rangeToUse.Areas 
 myOperation singleArea 
 Next 
End If

Eigenschaften

Siehe auch

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.