Vba: so wählen sie alle zellen aus, die daten enthalten

Sie können in VBA die folgenden Methoden verwenden, um alle Zellen auszuwählen, die Daten in einem Blatt enthalten:

Methode 1: Wählen Sie ein Zellraster mit Daten aus

 SubSelectCellsWithData ()

Range(" A1 ").CurrentRegion.Select

End Sub

Dieses spezielle Makro wählt ein Zellenraster mit Daten aus, beginnend mit Zelle A1 des aktuell aktiven Blatts.

Methode 2: Wählen Sie einzelne Zellen mit Daten aus

 SubSelectCellsWithData ()

Worksheets(" Sheet1 ").Activate
ActiveSheet.Cells.SpecialCells(xlCellTypeConstants).Activate

End Sub

Dieses spezielle Makro wählt alle einzelnen Zellen aus, die Daten aus Sheet1 enthalten.

Die folgenden Beispiele zeigen, wie jede Methode in der Praxis mit dem folgenden Blatt namens Sheet1 in Excel verwendet wird:

Beispiel 1: Wählen Sie ein Zellraster mit Daten aus

Angenommen, wir möchten das Zellenraster auswählen, das Daten in Sheet1 enthält.

Dazu können wir das folgende Makro erstellen:

 SubSelectCellsWithData ()

Range(" A1 ").CurrentRegion.Select

End Sub

Wenn wir dieses Makro ausführen, können wir sehen, dass das gesamte Zellenraster mit den Daten in Sheet1 ausgewählt wurde:

Beachten Sie, dass diese Methode die CurrentRegion- Eigenschaft verwendet, um den von leeren Zellen eingeschlossenen Zellbereich auszuwählen.

Die vollständige Dokumentation zur CurrentRegion- Eigenschaft finden Sie hier .

Beispiel 2: Einzelne Zellen mit Daten auswählen

Angenommen, wir möchten nur alle einzelnen Zellen auswählen, die Daten in Sheet1 enthalten.

Dazu können wir das folgende Makro erstellen:

 SubSelectCellsWithData ()

Worksheets(" Sheet1 ").Activate
ActiveSheet.Cells.SpecialCells(xlCellTypeConstants).Activate

End Sub

Wenn wir dieses Makro ausführen, können wir sehen, dass jede einzelne Zelle in Tabelle1 , die Daten enthält, ausgewählt ist:

Zusätzliche Ressourcen

In den folgenden Tutorials wird erläutert, wie Sie andere häufige Aufgaben in VBA ausführen:

VBA: So legen Sie den Wert einer Zelle in einem anderen Blatt fest
VBA: So wählen Sie einen Bereich in einer aktiven Zelle aus
VBA: So löschen Sie Zeilen basierend auf dem Zellenwert