Excel ListBox Selection entfernen?

1 Antwort

Vom Fragesteller als hilfreich ausgezeichnet

Müsste so funktionieren:

Private Sub ListBox1_AfterUpdate()
    If ListBox1.ListIndex = -1 Then Exit Sub
    'Deine Berechnungen
    ListBox1.ListIndex = -1
End Sub

Mit "ListBox1.ListIndex=-1" löscht du die Auswahl. Das ruft die Prozedur allerdings noch einmal auf, daher...

Mit "If ListBox1.ListIndex = -1 Then Exit Sub" verhinderst du, dass die Berechnungen nach dem Löschen der Auswahl noch einmal durchgeführt werden.