frmDate - Formularfehler
10.06.2009 16:56:44
Friedl
nach langer Zeit wieder mal da - mit folgendem Problem.
Bislang habe ich Office 2000 verwendet und mein Kalenderelement (durch Doppelklick auf die jeweilige Zelle) hat hervorragend funktioniert, jetzt, in Office 2003 bekomme ich permanent die Fehlermeldung...
...Fehler beim Kompilieren: Projekt oder Bibliothek nicht gefunden
"Date" wird dabei als Fehler markiert!
Der Code:
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Excel.Range, Cancel As Boolean)
If Target.Column = 4 Or 10 Then 'Datum
If IsDate(Target) = True Then
Target = ""
Cells(ActiveCell.Row + 1, ActiveCell.Column).Select
SendKeys "{UP}"
Else
frmDatum.Calendar1.Value = Date
frmDatum.Show
Cells(ActiveCell.Row + 1, ActiveCell.Column).Select
SendKeys "{UP}"
End If
End If
End Sub
Ich habe schon so ziemlich alles versucht, komme aber zu keinem Ergebnis.
Vielleicht hat von euch jemand 'ne Idee und weiß Rat!?
Dank im voraus
Friedl