Userform kann nich geöffnet werden
15.10.2008 15:56:00
Maris
ich verwende für eine Zelle eine userform (Kalender) um in die entsprechende Zelle ein Datum eintragen zu lassen. Leider funktioniert das auf meinem Laptop nicht... beim anklicken der Zelle kommt die Fehlermeldung: variable nicht definiert! -->Abbruch. Der Code:
Option Explicit
Private Sub UserForm_Activate()
KAL_Kalender = Date ' im Kalender das aktuelle Datum anzeigen
End Sub
Private Sub KAL_Kalender_Click()
ActiveCell = KAL_Kalender.Value ' ausgewähltes Datum eintragen
Me.Hide ' Userform schließen
End Sub
Woran liegt das?
Gruß
Maris