hi,
wie kann man in vb tabellenzellen ansprechen bzw. in einer schleife jeweils um eine zelle weiterzählen?
bssp: ich will überprüfen, was in einer zelle steht und je nach eigenschaft in der zelle drunter was eintragen. dann soll dasselbe in der zelle drunter passieren.
???
m.
Hallo michael
die Zelladressierung ist am einfachsten indem man die Zellen und Spaltenadressierung mit der Funktion Cells(Zeile,Spalte) bewerkstellig und dann Werte ausliest bzw. in die Zelle einträgt.
Hier ein kleines Beispiel, das die Werte in Zeile 2 in den Spalten 1 bis 20 prüft und abhängig vom Ergebnis in Zeile 4 Groß oder Klein einträgt.
Sub ZellenAdressieren()
ActiveWorkbook.Sheets("Tabelle1").Select
Startzeile = 2
Startspalte = 1 'Spalte A
Endspalte = 20
For I = Startspalte To Endspalte
If Cells(Startzeile, I) \> 5 Then
Cells(Startzeile + 1, I) = "Groß"
Else
Cells(Startzeile + 1, I) = "Klein"
End If
Next I
End Sub
Gruß
Franz
[Bei dieser Antwort wurde das Vollzitat nachträglich automatisiert entfernt]