Hallo Zusammen,
ich habe eine Filterauswahl und möchte, dass bei der Wertauswahl der Coursor direkt in die Zelle springt, in der sich der Wert befindet.
Dim i As Integer
Dim ws As Worksheet
Dim a As Variant
Set ws = Worksheets("Tabelle1")
i = 9
a = ws.Cells(7, 2)
Do While ws.Cells(i, 2) ""
If a = ws.Cells(i, 2) Then
ws.Cells(i, 2).Select
End If
i = i + 1
Loop
Leider funktioniert das Makro nicht. Weiß nicht warum.
Grüße
Stephan