Wert aus Kalender in Zelle ausgeben
05.02.2004 16:56:23
stefan
Habe da ein Kalender-Steuermodul in einer Userform.
Aufruf funkt super, nun soll der gewählte Wert bei click in Zelle F8 des selben Blattes geschrieben werden.
Kann mir jemand helfen den Code anzupassen? bitte?
So siehts jetzt aus:
Private Sub Calendar1_Click()
Sheets("Tabelle1").[a1] = DateClicked
End Sub
Private Sub UserForm_Initialize()
kalender = Date
End Sub
vielen Dank den Barmherzigen ;-)