habe nochmal ein Problem. Ich habe in oberen Fenster eine Tabelle. Suchbegriff in Spalte D1-199 und im unteren Fenster eine Liste zu dem Begriff in Spalte A 200-400. Ich möchte, das VBA nur dann sucht, wenn ich mich in Spalte D1-199 befinde.
Vielleicht habt Ihr eine Lösung, bin noch zu unerfahren in VBA Programmierung. Das zweite Problem ist ein Aufbaufehler der markierten Zellen.
Hier das Programm:
Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
Dim z As Range
Dim z2 As Range
Set z = ActiveCell
If Not IsEmpty(z) Then
Set z2 = Rows("200:400").Find(what:=z.Value, LookIn:=xlValues)
If Not z2 Is Nothing Then
If z2.Row <> z.Row Then
ActiveWindow.Panes(2).ScrollRow = z2.Row
End If
End If
End If
End Sub
Wäre wirklich super, wenn mir jemand hilft, Gruß auch an Alfred
Bis dann Bernhard