Hallo und guten Tag,
Ich habe eine einfache Eingabemaske in VBA mit 4 Eingabefeldern und 2 CommandButtons für "OK" und "Abbrechen". Bestätige ich nach Eingabe eines Datensatzes mit "OK", bleibt der Datensatz samt Werte "stehen" und überträgt sich logischerweise bei Klick auf OK immer wieder mit den gleichen Werten in die Excel-Tabelle. Dies habe ich erstmal mit dem Befehl "Unload Me" geändert. Allerdings schliesst sich das Formular dann komplett und ich muss die UserForm für jeden Datensatz neu starten. Am Idealsten wäre es allerdings, wenn das Formular nach Eingabe auf "OK" automatisch wieder von "Null" anfängt für einen neuen Datensatz. Quasi das Gegenteil des Unload Me-Befehls. Weiß hier jemand, was dort anstelle von "Unload Me" stehen muss?
So sieht der letzte Abschnitt der Userform aus:
Sheets("Einkauf").Cells(erste_freie_Zeile, 5) = CDbl(TextBox5.Text)
Unload Me
End Sub
Private Sub CommandButton2_Click()
'Bei Abbrechen UserForm schließen
Unload Me
End Sub
Grüße aus Tecklenburg
Michael
|