VBA-Auswahlbereich / Zellen

Mit VBA können Sie eine Zelle, Zellbereiche oder alle Zellen im Arbeitsblatt auswählen. Sie können die ausgewählte Zelle oder den ausgewählten Bereich mit dem Auswahlobjekt bearbeiten.

Wählen Sie eine einzelne Zelle mit VBA aus

Sie können eine Zelle in einem Arbeitsblatt mit der Select-Methode auswählen. Der folgende Code wählt Zelle A2 im ActiveWorksheet aus:

1	Bereich("A2").Wählen

Oder

1	Zellen(2, 1).Wählen

Das Ergebnis ist:

Wählen Sie einen Zellbereich mit VBA aus

Sie können eine Gruppe von Zellen in einem Arbeitsblatt mit der Select-Methode und dem Range-Objekt auswählen. Der folgende Code wählt A1:C5:

1	Bereich("A1:C5").Wählen

Wählen Sie einen Bereich nicht zusammenhängender Zellen mit VBA

Sie können Zellen oder Bereiche auswählen, die nicht nebeneinander liegen, indem Sie die Zellen oder Bereiche in VBA durch ein Komma trennen. Mit dem folgenden Code können Sie die Zellen A1, C1 und E1 auswählen:

1	Bereich("A1, C1, E1").Wählen

Sie können in VBA auch Sätze von nicht zusammenhängenden Bereichen auswählen. Der folgende Code wählt A1:A9 und B11:B18:

1	Bereich("A1:A9, B11:B18").Wählen

Wählen Sie alle Zellen in einem Arbeitsblatt aus

Sie können alle Zellen in einem Arbeitsblatt mit VBA auswählen. Der folgende Code wählt alle Zellen in einem Arbeitsblatt aus.

1	Zellen.Auswählen

Wählen Sie eine Zeile aus

Sie können eine bestimmte Zeile in einem Arbeitsblatt auswählen, indem Sie das Row-Objekt und die Indexnummer der Zeile verwenden, die Sie auswählen möchten. Der folgende Code wählt die erste Zeile in Ihrem Arbeitsblatt aus:

1	Zeilen(1).Auswählen

Wählen Sie eine Spalte aus

Sie können eine bestimmte Spalte in einem Arbeitsblatt auswählen, indem Sie das Spaltenobjekt und die Indexnummer der Spalte verwenden, die Sie auswählen möchten. Der folgende Code wählt Spalte C in Ihrem Arbeitsblatt aus:

1	Spalten(3).Wählen

Wählen Sie die letzte nicht leere Zelle in einer Spalte

Angenommen, Sie haben Daten in den Zellen A1, A2, A3 und A4 und möchten die letzte nicht leere Zelle auswählen, die Zelle A4 in der Spalte wäre. Sie können dazu VBA und die Range.End-Methode verwenden.

Die Range.End-Methode kann vier Argumente annehmen, nämlich: xlToLeft, xlToRight, xlUp und xlDown.

Der folgende Code wählt die letzte nicht leere Zelle aus, die in diesem Fall A4 wäre, wenn A1 die aktive Zelle ist:

1	Range("A1").End(xlDown).Select

Wählen Sie die letzte nicht leere Zelle in einer Zeile

Angenommen, Sie haben Daten in den Zellen A1, B1, C1, D1 und E1 und möchten die letzte nicht leere Zelle auswählen, die Zelle E1 in der Zeile wäre. Dazu können Sie VBA und die Range.End-Methode verwenden.

Der folgende Code wählt die letzte nicht leere Zelle aus, die in diesem Fall E1 wäre, wenn A1 die aktive Zelle ist:

1	Range("A1").End(xlToRight).Select

Wählen Sie die aktuelle Region in VBA

Du kannst den … benutzen CurrentRegion-Eigenschaft des Range-Objekts, um einen rechteckigen Bereich leerer und nicht leerer Zellen um eine bestimmte Eingabezelle herum auszuwählen. Wenn Sie Daten in Zelle A1, B1 und C1 haben, würde der folgende Code diesen Bereich um Zelle A1 auswählen:

1	Range("A1").CurrentRegion.Select

Es würde also der Bereich A1:C1 ausgewählt.

Wählen Sie eine Zelle aus, die relativ zu einer anderen Zelle ist

Du kannst den … benutzen Offset-Eigenschaft um eine Zelle auszuwählen, die relativ zu einer anderen Zelle ist. Der folgende Code zeigt Ihnen, wie Sie Zelle B2 auswählen, die 1 Zeile und 1 Spalte relativ zu Zelle A1 ist:

1	Range("A1").Offset(1, 1).Select

Wählen Sie einen benannten Bereich in Excel

Sie können auswählen Benannte Bereiche sowie. Angenommen, Sie haben die Zellen A1:A4 Fruit benannt. Sie können den folgenden Code verwenden, um diesen benannten Bereich auszuwählen:

1	Range("Frucht").Select

Auswählen einer Zelle in einem anderen Arbeitsblatt

Um eine Zelle in einem anderen Arbeitsblatt auszuwählen, müssen Sie das Blatt zunächst mit der Methode Worksheets.Activate aktivieren. Mit dem folgenden Code können Sie Zelle A7 auf dem Blatt mit dem Namen Sheet5 auswählen:

12	Worksheets("Sheet5").AktivierenBereich("A1").Wählen

Manipulation des Auswahlobjekts in VBA

Nachdem Sie eine Zelle oder einen Zellbereich ausgewählt haben, können Sie auf das Auswahlobjekt verweisen, um diese Zellen zu manipulieren. Der folgende Code wählt die Zellen A1:C1 aus und setzt die Schriftart dieser Zellen auf Arial, die Schriftstärke auf Fett, den Schriftstil auf Kursiv und die Füllfarbe auf Grün.

123456789

Unterformatauswahl()Bereich("A1:C1").WählenSelection.Font.Name = "Arial"Selection.Font.Bold = TrueSelection.Font.Italic = TrueSelection.Interior.Color = vbGreenEnd Sub

Das Ergebnis ist:

Verwenden des With… End With Construct

Wir können das obige Beispiel mit der With / End With-Anweisung wiederholen, um nur einmal auf das Selection-Objekt zu verweisen. Das spart Tipparbeit und macht Ihren Code in der Regel leichter lesbar.

1234567891011

Unter UsingWithEndWithSelection()Bereich("A1:C1").WählenMit Auswahl.Font.Name = "Arial".Font.Bold = True.Font.Italic = True.Interior.Color = vbGreenEnde mitEnd Sub