Combobox mitspringen zur Zelle
08.11.2005 16:44:01
Heinz
Habe für eine Combobox folgenden Code bekommen.
Private Sub ComboBox1_Change()
If ComboBox1.Value = "" Then Exit Sub
Const ZeilenDazwischen = 45
Cells(ComboBox1.ListIndex * ZeilenDazwischen + 1, 1).Select
End Sub
Funkt.auch.
Aber wenn ich jetzt um 45 zellen rauf oder runterspringe müsste ich dort eine neue Combobox erstellen.
Meine Frage: Ist es möglich das die Combobox die 45 Zeilen mitspringt?
Wenn ja wie würde der Code lauten.
Danke Heinz
Anzeige