Problem mit UserForm + Klassenmodul

Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

Hallo Jens,
1. Das ist doch Unsinn:

Private Sub mySpinButton_Change()
'Textboxwert wird auf das neue Datum gesetzt
mySpinButton.Value = Format(mySpinButton.Value, "DD-MM-YYYY")
End Sub

Der Spinnbutton soll doch keinen neuen Wert bekommen, noch dazu im Datumsformat (daher auch der Fehler, denn Die Format-Funktion liefert einen String zurück), sondern die Textbox.
2. Das geht zwar: Format(mySpinButton.Value, "DD-MM-YYYY") Aber die Funktion erwartet für das Datumsformat eigentlich Kleinbuchstaben. MM wird normalerweise für Minuten benutzt. Bei dir muss die Funktion erst mal "überlegen" :-) was es mit den Minuten zwischen Tag und Jahr auf sich haben könnte, um dann nach kurzer Bedenkzeit doch korrekterweise Monate auszugeben.
3. Du kannst doch nicht einfach Events erfinden. Wenn du dir nicht sicher bist, dann wähle in der linken Combobox über dem Codefenster das Objekt aus. In der rechten Combobox bekommst du dann alle möglichen Events angeboten. Wenn du das gewünschten nicht findest, dann gibt es das nicht. Und es macht, wie du siehst, auch keinen Sinn es trotzdem in das Modul zu schreiben, das springt nie an.
Gruß
Nepumuk

Hi Nepumuk,
vielen Dank für deine Hilfe!
ad 1. und 2.:
Tja, wer richtig abschreiben kann, ist klar im Vorteil! :-) Mit richtigem Datumsformat hätte es natürlich heißen sollen:
myTextBox.Value = Format(mySpinButton.Value, "dd-mm-yyyy")
ad 3.:
Im Beispiel auf www.excel-vba.de/userform.htm#Datumdrehfeld wurde TextBox_Exit verwendet und ich hatte dieses Event ungeprüft für das Klassenmodul übernommen. In dem Sinn war das Event nicht völlig erfunden (funktioniert ja auch im Codeteil einer Userform), aber im Klassenmodul funktioniert's dann leider nicht mehr.
Schade, weil der Code außerhalb des Klassenmoduls richtig gut funktioniert hatte...
Was ich tun möchte ist ja, die Eingabe der TextBox zu kontrollieren, wenn diese verlassen wird - daher hätte _Exit gut gepasst. Nun gibt's das Event im Klassenmodul aber nicht. Hast du einen Vorschlag, wie ich das, was der Code tun sollte, mit den Events hinkriegen könnte, die im Klassenmodul verfügbar sind?
Ich denke mir, dass das Problem nicht ganz neu ist; hab zwar ausgiebig gegoogelt, aber nichts Passendes gefunden... Kennst du vielleicht eine Website mit entsprechenden gut funktionierenden Vorlagen für solche Klassenmodule, mit denen man das Verhalten von MSForms-Elementen auf Userforms kontrollieren kann?
Vielen Dank,
der Jens

Beliebteste Forumthreads (12 Monate)

Problem mit UserForm + Klassenmodul

6
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Beliebteste Forumthreads (12 Monate)

Problem mit UserForm + Klassenmodul

6 Beiträge zum Forumthread Beiträge zu diesem Forumthread

VBA Beispiele zu verwandten Themen

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Beliebteste Forumthreads (12 Monate)

6
Beiträge zum Forumthread

Beiträge zu diesem Forumthread