Auf Zellen zugreifen mit Cells in Excel VBA
In diesem Tutorial zeige ich Euch wie Ihr mit Cells auf Zellen in Excel VBA zugreifen könnt. Cells ist ideal fĂŒr Schleifen, da die benötigten Parameter aus Zahlen bestehen. Ich empfehle Euch aber einmal nach der Kombination aus Range und Cells Ausschau zu halten. Damit seit Ihr extrem flexibel.
Das Startvideo der VBA Tutorial Serie auf YouTube findet Ihr hier
Die Playlist meiner VBA Tutorial Serie auf YouTube findet Ihr hier
Achtung:
Benutzt zum Ăben eine separate Tabelle fĂŒr Testzwecke oder eine Kopie des Originals damit Euch keine Daten verloren gehen.
Video zu diesem Tutorial:
Beispiele mit Cells in Excel VBA
Cells ist sehr einfach aufgebaut und benötigt 2 Parameter.
Cells(Zeilennummer, Spaltennummer)
In den nachfolgenden Beispielen zeige ich Euch wie Ihr mit Cells verschiedene Zellen ansprechen oder besser gesagt selektieren könnt. Ich schreibe rechts neben dem Code die jeweilige Position die man ĂŒber die normale BenutzeroberflĂ€che in Excel gewohnt ist.
Sub CellsTutorial() Cells.Select 'Hier werden alle Zellen ausgewÀhlt End Sub
In dem Beispiel selektiere ich die Zelle C2
Sub CellsTutorial2() Cells(2, 3).Select 'Auswahl von Zelle C2 End Sub
Beim nachfolgenden Beispiel benutze ich FormulaLocal. Das wÀre aber eigentlich erst erforderlich wenn man Funktionen benutzt wie SUMME oder WENN die von der Sprache abhÀngig sind.
Sub CellsTutorial3() Cells(4, 5).FormulaLocal = "=1+1" 'Eintrag der Formel =1+1 in Zelle E4 End Sub
Im nachfolgenden Code benutze ich eine Formel. Das funktioniert, solange man keine Funktionen benutzt die von der Sprache abhÀngt.
Sub CellsTutorial4() Cells(4, 5).Value = "=1+1" 'Eintrag der Formel =1+1 in Zelle E4 End Sub
Weitere Scriptbeispiele:
Aus einem anderen Video, welches sich mit Cells beschÀftigt ist dieser Code. Das Video findet Ihr hier: Mit Cells die Zelle Tabelle Arbeitsmappe selektieren
Sub CellsKurzTutorial1() 'Zelle A1 selektieren Cells(1, 1).Select End Sub Sub CellsKurzTutorial2() 'Erste Tabelle und Zelle B1 selektieren Worksheets(1).Cells(1, 2).Select End Sub Sub CellsKurzTutorial3() 'Tabelle mit dem Namen Tabelle1 und Zelle C1 selektieren Worksheets("Tabelle1").Cells(1, 3).Select End Sub Sub CellsKurzTutorial4() 'Tabelle mit dem Objekt-Namen Tabelle 1 und Zelle D1 selektieren Tabelle1.Cells(1, 4).Select End Sub Sub CellsKurzTutorial5() 'Arbeitsmappe mit Index 1 Tabelle mit dem Namen Tabelle1 und Zelle E1 selektieren Workbooks(1).Worksheets("Tabelle1").Cells(1, 5).Select End Sub Sub CellsKurzTutorial6() 'Arbeitsmappe mit Namen Mappe1 Tabelle mit Namen Tabelle1 und Zelle A3 selektieren Workbooks("Mappe1").Worksheets("Tabelle1").Cells(3, 1).Select End Sub Sub CellsKurzTutorial7() 'Arbeitsmappe in der dieses Modul steckt Tabelle mit Namen Tabelle1 und Zelle B3 selektieren ThisWorkbook.Worksheets("Tabelle1").Cells(3, 2).Select End Sub Sub CellsKurzTutorial8() 'Arbeitsmappe mit Objekt-Namen DieseArbeitsmappe Tabelle mit Namen Tabelle1 und Zelle C3 selektieren DieseArbeitsmappe.Worksheets("Tabelle1").Cells(3, 3).Select End Sub