Office: (Office 2010) Anfügeabfrage mit Datum

Hallo
Bräuchte wieder mal eure Hilfe:
Ich habe zwei Tabellen. In der tbl_tab_1 stehen Nachnamen und vornamen drin.
in der tbl_tab_2 sollen Nachnamen vornamen und ein datum welches ich über ein Formular immer wieder befülle. Ich möchte über eine Anfügeabfrage alle namen aus tbl_tab_1 anfügen die nicht mit dem datum übereinstimmen welches ich in einem anderen Formular auswähle.

kleines Bsp:
tbl_tab_1: Max Mustermann, Hans Gast, Elke Freiberg
tbl_tab_2: Max Mustermann, Datum 09.10.2014, Hans Gast, Datum 08.10.2014
im formular_datum_waswahl wähle ich 09.10.2014 aus
jetzt soll bei der abfrage Hans Gast und Elke Freiberg hinzugefügt werden obwohl der Name (Hans Gast) zwar schon in der Tabelle ist aber mit einem anderen Datum und elke noch garnicht drin steht.

Hoffe mein problem verständlich beschrieben zu haben.
DANKE Für eure Hilfe.
mfg
andritz1986

:)

 

Moin,
dazu musst du dir ein Kriterium mit Vorname, Nachname und Datum bauen, nach diesem Muster: donkarls Access-Seiten.
maike

 

DANKE erstmal. Ich hab schon einen sql code im vba der aber noch nicht das datum drin hat. Aber ich krieg den net so hin wie ich es bräuchte.
Code:

Wie gesagt jetzt brauch ich nochwas wo nur die hinzugefügt werden die mit einem ausgewählten Datum noch nicht in der Liste sind.
Das Datum kommt aus dem Feld frm_auswahl_Di_Do Me.Datum

andritz1986

 

Du musst doch nur hier
Code:

das Datumskriterium mit angeben, wenn ich das richtig sehe.
maike

 

Danke - hab das gleich mal ausprobiert und das jetzt eingefügt
Code:

Dann bekomm ich die Fehlermeldung: "1 Parameter wurde erwartet, aber es wuren zu wenige Paramenter übergeben."
Obwohl das Formular auswahl mit versortem Datum offen ist.
Wenn ich den sql Code in eine Abfrage rein mach zeigt er mir aber nur die Namen an die noch nicht in der Tabelle sind aber ich brauch ja alle die nicht in der Liste sind und das ausgewählte Datum auch nicht haben.
also kann ein Name mehrfach vorkommen aber mit verschiedenen Datum.

 

Du hast ja auch keinen Vergleich drin:
Code:

maike

 

Geht noch immer net *frown.gif*
Code:

Zwei sachen: erstens sag mir Code:

"Erwartetes Anweisungsende" und zweiten ist das Feld datum in der Tablle mit dem Variablen Namen "name_tabelle" den ich als versuch "tbl_Plan_8_Male.Datum" so hingeschrieben hab aber der sollte variable bleiben.....

Immer schwer mit den vba anfängern.... danke maikek für deine Hilfe UND geduld mit mir !!!!

 

Code:

So schaut der Code jetzt aus aber es kommt jetzt wieder der Parameterfehler

 

Jetzt versteh ich garnix mehr..... es kommt der Fehler: 3061 1 Parameter wurden erwartet, aber....
aber wenn ich in die Tablle schau macht er alle richtig !!!!!!
Aber wenn das Datumfeld leer ist fügt er immer wieder alle datensätze hinzu. kann man das so machen, dass wenn das datumsfeld leer ist und der name mit leeren datum schon in der tabelle dann nicht nochmal hinzugefügt wird??

Weiß echt mehr weiter !!!!!

 

Ich hab's mal etwas bereinigt:
Code:

Guck dir die von Debug.Print im Direktfenster ausgegebene SQL mal an, teste sie im Abfrageentwurf, im Zweifelsfall poste sie hier.

Edit: Das Datumsfeld füllst du im Moment wohl nicht, das müsstest du dann noch tun. Datum ist BTW kein guter Feldname, weil reserviertes Wort, EinsatzDatum oder so ähnlich wäre besser.

maike

 

Guck dir die von Debug.Print im Direktfenster ausgegebene SQL mal an, teste sie im Abfrageentwurf, im Zweifelsfall poste sie hier.

Edit: Das Datumsfeld füllst du im Moment wohl nicht, das müsstest du dann noch tun. Datum ist BTW kein guter Feldname, weil reserviertes Wort, EinsatzDatum oder so ähnlich wäre besser.

maike


Das Kommt raus im direktfenster:
Code:

Aber es kommt wieder die fehlermeldung 3061 1 Parameter.....
und in die Tabelle schreibt er auch nix..
wenn ich den code in den abfrageentwurf rein schreibe kommen nur die namen die noch nicht in der tabelle sind egal welches datum ich auswähle
INFO: ein datensatz steht drin und der hat ein datum drin

 

Hallo
evtl. beschäftigst Du Dich einmal auch
Mit BuildCriteria
dazu Lies in meiner Doc s. Fusszeile Unten Rechts
Seite: 75 bis 79 Where-Bedingung mit BuildCriteria erstelle
und spz. für Datum
Seite: 297 Kriterien für Datum Vergleich (Filter) mit BuildCriteria erstellen

 

Hi
Den rat hab ich schon mal bei einem anderen Problem von dir bekommen und mir glecih mal angeschaut aber net verstanden.... bin einfach net weitergekommen... gut war das jemand anderes mein problem anders (und vorallem für mich verständlich) gelöst hat

 

Da müssen wohl noch Hochkomma um das Datum:
WHERE Einsatzdatum = '" & Format(Nz(Forms!frm_auswahl_Di_Do![Datum], Date), "\#yyyy\-mm\-dd\#") & "'"
Debug.print strSQL
maike

 

Code:

Bringt den Fehler 3464: Datentypenkonflikt in Kriterienausdruck
VBA CODE:
Code: