habe wieder mal bzw. leider noch immer Probleme mit meinem VBA Code.
Wie kann man den Inhalt einer Listbox bzw. eigentlich zuvor ausgewählte Werte mittels keydown löschen?
Multiselect sollte funktionieren - aber ich wäre schon froh über einen Denkanstoss wie es mit einzelnen Werten funktioniert.
Befüllt wird meine Listbox mit:
Private Sub Calendar1_Click()
If cbo_Name "" Then
With Worksheets("Datenbank")
.Cells(cbo_Name.ListIndex + 2, Calendar1.Day + 3) = Calendar1.Value
End With
LB_Tage.AddItem Calendar1.Value
Else
MsgBox "Bitte einen Schüler auswählen..."
End If
End Sub
Wie man erkennen kann - werden Datumswerte in der Listbox eingetragen. Wenn nun ein Datum falsch angeklickt wird - kann ich bisher nur die komplette Listbox leeren - das ist aber dann relativ umständlich immer wieder die letzte Eingabe zu wiederholen, daher wäre ich froh, wenn ich die "falschen" Werte einzeln oder am besten mit Multiselect löschen kann.
Danke.
Schöne Grüße aus TiROL
Alex S.