Liebe Community,
ich bin als absoluter VBA-Neuling dabei, ein Makro zu programmieren. Leider habe ich etwas Schwierigkeiten und hoffe deshalb auf die Hilfe von euch Excelprofis.
Ich habe eine Userform in der ich Einträge anlegen, bearbeiten und löschen kann. Excel dient hierbei nur als Datenbank. Der Nutzer soll lediglich mit der Benutzeroberfläche arbeiten. Neue Einträge anzulegen klappt bereits super, mit dem ändern von Einträgen in der Listbox habe ich jedoch Probleme. Ich möchte eine Zeile auswählen, auf einen „Ändern-Button“ klicken und dann die Daten in einer neuen Userform angezeigt bekommen. Das klappt auch. Jedoch weiß ich nicht, wie ich den Eintrag überschreiben kann. Habt ihr eine Lösung für mich? Die Daten werden folgendermaßen in die zweite Userform übertragen:
Private Sub CommandButton2_Click()
With ListBox1
UserForm3.ComboBox2 = .List(.ListIndex, 1)
UserForm3.TextBox3 = .List(.ListIndex, 2)
UserForm3.TextBox1 = .List(.ListIndex, 3)
UserForm3.ComboBox1 = .List(.ListIndex, 4)
UserForm3.TextBox2 = .List(.ListIndex, 5)
End With
UserForm3.Show
End Sub
Zudem bekomme ich einen Laufzeitfehler (381: Eigenschaft List konnte nicht abgerufen werden. Index des Eigenschaftenfeldes ungültig.), wenn ich keinen Eintrag in der Listbox ausgewählt habe und auf „Ändern“ klicke.
Ich bin über jede Hilfe sehr dankbar!
Viele Grüße
|