Gruppe
Allgemein
Problem
Wie kann ich in Spalte A Werte in Abhängigkeit der Werte in Spalte B eintragen lassen?
StandardModule: basMain
Sub Eintragen()
Dim rng As Range
Set rng = Range("B1")
Do Until IsEmpty(rng)
If rng = 2 Then rng.Offset(0, -1) = "Ok"
Set rng = rng.Offset(1, 0)
Loop
End Sub