Arbeiten mit der aktiven Zelle

Die Eigenschaft ActiveCell gibt ein Range-Objekt zurück, das für die aktive Zelle steht. Sie können eine der Eigenschaften oder Methoden eines Range-Objekts auf die aktive Zelle anwenden, wie im folgenden Beispiel dargestellt. Obwohl eine oder mehrere Zellen eines Arbeitsblatts ausgewählt werden können, kann nur eine Zelle in diesem Abschnitt die ActiveCell sein.

Sub SetValue() 
 Worksheets("Sheet1").Activate 
 ActiveCell.Value = 35 
End Sub

Hinweis Sie können nur mit der aktiven Zelle arbeiten, wenn das Arbeitsblatt, auf dem sie sich befindet, das aktive Blatt ist.

Verschieben der aktiven Zelle

Mithilfe der Range .Activate-Methode können Sie die aktive Zelle festlegen. Beispielsweise können Sie mit der folgenden Prozedur die Zelle B5 als aktive Zelle festlegen und anschließend fett formatieren.

Sub SetActive_MakeBold() 
 Worksheets("Sheet1").Activate 
 Worksheets("Sheet1").Range("B5").Activate 
 ActiveCell.Font.Bold = True 
End Sub

Hinweis Verwenden Sie die Select-Methode , um einen Zellbereich auszuwählen. Um eine einzelne Zelle als aktive Zelle festzulegen, verwenden Sie die Activate -Methode.

Sie können die Offset-Eigenschaft verwenden, um die aktive Zelle zu verschieben. Die folgende Prozedur fügt in die aktive Zelle des markierten Bereichs Text ein und verschiebt sie anschließend eine Zelle nach rechts, ohne die Markierung zu ändern.

Sub MoveActive() 
 Worksheets("Sheet1").Activate 
 Range("A1:D10").Select 
 ActiveCell.Value = "Monthly Totals" 
 ActiveCell.Offset(0, 1).Activate 
End Sub

Markieren der die aktive Zelle umgebenden Zellen

Die CurrentRegion-Eigenschaft gibt einen Zellbereich (auch als „Insel" bezeichnet) zurück, der durch leere Zeilen und Spalten begrenzt wird. Im folgenden Beispiel wird eine Markierung auf angrenzende Zellen erweitert, die Daten enthalten. Anschließend wird dieser Bereich mit der Formatvorlage „Währung" formatiert.

Sub Region() 
 Worksheets("Sheet1").Activate 
 ActiveCell.CurrentRegion.Select 
 Selection.Style = "Currency" 
End Sub

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.