Laufzeitfehler 1004
04.10.2003 09:20:20
Franz W.
ich stolpere grade über eine Fehlermeldung und komm leider nicht drauf.
Mit folgendem code frage ich in einer UF einen Wert ab:
Sub Wechsel()
frmKdCh.btnOk.SetFocus
frmKdCh.Show
If frmKdCh.result = False Then
Exit Sub
Else
MsgBox frmKdCh.Calendar1.Value
Worksheets("Ablesungen").Range("J2").Value = frmKdCh.Calendar1.Value
End If
End Sub
- Zum Testen gebe ich diesen Wert in einer MsgBox aus und das klappt! Der Wert wird angezeigt.
- Beim Eintragen des Wertes in die Tabelle gibt's dann allerdings die Fehlermeldung "Laufzeitfehler 1004: Anwendungs- oder objektorientierter Fehler."
Könnt Ihr mir da bitte helfen?
Vielen Dank schon mal und Grüße
Franz
Anzeige