Nächste Zelle anwählen VBA
23.02.2017 06:41:27
Defence
Hab da ein kleines Problem. Folgender Code:
Private Sub Worksheet_Change(ByVal Target As Range)
If Range("M7").Value > 0 Then
Range("o7").Select
End If
If Range("O7").Value > "" Then
Range("M9").Select
End If
If Range("M9").Value > 0 Then
Range("o9").Select
End If
End Sub
Eigentlich soweit ok. Wenn jetzt aber in O9 was drin steht, und in den anderen Zellen nichts steht, und ich dann in M7 etwas eintrage springt er mir nicht auf O7 sondern auf O9. Was mache ich falsch? Wenn alle Zellen leer sind, dann springt er genau dorthin wo ich will!!!
Danke für eure Hilfe.
Gruss
Defence
Anzeige