Calendar1.value
31.12.2003 12:37:16
felix
habe in "Tabelle1" = sheets(1) einen Kalender eingefügt.
Dieser soll mit einem Doppelklick das Datum des Kalenders in die active Zelle
eintragen. Aber mit dem folgenden Code geht es nicht. Warum?
Private Sub Calendar1_Click()
ActiveCell.Value = Sheets(1).Calendar1.Value
End Sub
über eine Userform funktioniert der Code:
Private Sub Calendar1_Click()
ActiveCell.Value = Calendar1.Value
End Sub
Was muß ich im oberen Code ändern damit das auch über eine Tabelle funktioniert und nicht nur über eine Userform.
Gruß und guten Rutsch an alle
Felix