Werte außerhalb des ListIndex nicht einlesen
chandler
ich habe ein undefiniertes Problem mit Textboxen einlesen.
Beim löschen der Selectbox (Text markieren und löschen) werden Werte trotz allem eingelesen, die außerhalb des ListIndex (hier ListIndex + 5) liegen. siehe Code.
In Beispiel werden Werte aus der Zeile 4 eingelesen. Die Textboxen sollen einfach leer bleiben, wenn der Inhalt in der Selectbox von Hand gelöscht wird.
Hat jemand eine Idee? Wie könnte ich das Problem nur lösen?
Private Sub cbselect1_Change()
With Worksheets("Tabelle2")
Worksheets("Tabelle1").Range("R10").Value = _
.Cells(cbselect1.ListIndex + 5, 9).Value
Worksheets("Tabelle1").Range("S10").Value = _
.Cells(cbselect1.ListIndex + 5, 16).Value
Worksheets("Tabelle1").Range("T10").Value = _
.Cells(cbselect1.ListIndex + 5, 17).Value
End With
End Sub
Anzeige