Private Sub cmdListbox_Click()
ListBox3.AddItem txtInput.Value
UserForm1.txtInput = ""
UserForm1.txtInput.SetFocus
End Sub
Der Code funktionierte am Anfang wie ich wollte.
Jetzt kommt die Meldung "Laufzeitfehler 70" "Zugriff verweigert"
Die Zeile Listbox3 wird markiert.
Wo habe ich einen Fehler gemacht.
Gruss Erich