Jahr aus Datum

PeterW · August 23, 2011, 09:57:22

ich verzweifle an einer Funktion:
Die Zeile
MsgBox Month(Me!AktDat)
bringt mir korrekt die Zahl des Monats aus dem Datum in dem Feld AktDat
Die Zeile
MsgBox Day(Me!AktDat)
bringt mir korrekt die Zahl des Tages aus dem Datum in dem Feld AktDat
Die Zeile
MsgBox Year(Me!AktDat)
bringt mir die Fehlermeldung: Typen unverträglich

Gibt es dafür eine Erklärung?

Grüße aus Berlin
Peter

MzKlMu · August 23, 2011, 10:01:00

Hallo,
prüfe im VBA Editor unter "Extras" die Verweise. Wobei ich jetzt aber nicht genau weis, welcher gesetzt sein muss.
Welche Access Version hast Du?

PeterW · August 23, 2011, 13:02:58

ich habe Access 2003
die Funktion Year() funktioniert an anderer Stelle in der Datenbank einwandfrei, das ist es ja, was mich so verwundert.
Gruß
Peter

DF6GL · August 23, 2011, 13:10:16

Hallo,

an welches Tabellen-Feld mit welchem Datentyp ist das Form-Textfeld "AktDat" gebunden?

Was steht da aktuell drin?

Jonny · August 23, 2011, 14:34:41

Hallo Peter,
hast du die MsgBox mit Year hier reinkopiert?

Es sieht alles vollkommen richtig aus und den Fehler kann ich nicht nachvollziehen.
Ich habe sogar das Feld AktDat genannt und bekommen keine Meldung.
Vieleicht ist beim Feldnamen doch ein Tippfehler.
Getest mit Acc 2007

Gruß

Johann

PeterW · August 23, 2011, 15:18:36

wenn ich z.B. mit
MsgBox me!Aktdat
das Textfeld auslese, erhalte ich z.B. in der Messagebox: 23.08.2011
der Aufruf
MsgBox Month(me!AktDat) funktioniert einwandfrei, ich erhalte 8
MsgBox Day(me!AktDat) funktioniert ebenfalls einwandfrei, ich erhalte 23
Der Feldinhalt von AktDat wird programmintern generiert,
zur Prüfung des Feldinhaltes habe ich das Folgende gemacht:
X = me!AktDat
MsgBox VarType(x) ergibt dann 7, also handelt es sich um ein eindeutiges Datumsformat

Gruß
Peter

DF6GL · August 23, 2011, 17:20:21

Hallo,

tja, wenn es keine Verweis-Probleme gibt und es sich tatsächlich um ein Datumsfeld handelt, dann kann ich das auch nicht nachvollziehen. Du könntest aber die Db mal hier hochladen (evtl. datenreduziert, komprimiert und gezippt)

PeterW · August 24, 2011, 13:05:14

Hier ist ein Extrakt aus der DB mit 2 Formularen, in dem einen ist dir Funktion Year() OK, in dem Andren gibt es eine Fehlermeldung

[Anhang gelöscht durch Administrator]

daolix · August 24, 2011, 14:00:47

Liegt wohl daran das du einer Textbox den Namen Year gegeben hast.
Umbennen dann sollte es klappen.

PeterW · August 24, 2011, 14:38:10

Genau das war's
Vielen Dank
Gruß
Peter

MzKlMu · August 24, 2011, 15:02:19

Hallo,
das ist ein schönes Beispiel dafür, warum man unbedingt reservierte Worte für eigene Namensgebungen vermeiden sollte.

Neuigkeiten:

Jahr aus Datum