ListBox.Clear Laufzeitfehler
07.03.2020 16:59:06
Andreas
bei dem Versuch, die Elemente der ListBox zu löschen, erhalte ich den Laufzeitfehler
-2147467259 (80004005)
Code:
Option Explicit
Private Sub UserForm_Initialize()
Wahl.LK2.RowSource = "LK2Fächer"
End Sub
Private Sub LK2_Change()
Sheets("Fächer").Activate
With Wahl.LK1
.Clear
.RowSource = "LK1Fächer"
End With
Sheets("Formular").Activate
End Sub
Datei ist hochgeladen unter:
https://www.herber.de/bbs/user/135685.xlsm
TIA Andreas
Anzeige