Office: (Office 2007) Mehrfachauswahl über ein Listenfeld

Lies noch mal meinen Post #25. Du veränderst nicht str (abschneiden per mid) sondern ein Formularfeld namens Maschine, was dann nicht mehr benutzt wird.
Du musst str verändern, genau so wie bei den Mailadressen.
maike

 

Hi Maike,

so langsam wird mir einiges klar.
Habe das jetzt wie folgt gemacht.
Code:

Nun bleibt er aber bei
Code:

hängen.

EDIT: Habe die Anweisung jetzt so gemacht
Code:

Nun kriege ich aber dennoch nicht alle Werte, wenn ich zwei auswähle.

EDIT 2: In der Abfrage stehen beide Werte drin. Habe das auch mit den ' ausprobiert.

Gruß

Daniel

 

Alsooo, ...
str = Mid(str, 2) hier schneidest du das erste Zeichen von str ab.
Me.Maschine = str hier weist du einem Feld des aktuellen Formulars namens "Maschine" den Wert von str zu. Warum?

CurrentDb.QueryDefs("A_EADM").SQL = "Select * From T_Kundendaten Where Maschine IN (" & Mid(str, 2) & ")"
Und hier schneidest du ein zweites Zeichen von str ab.

Am besten immer mit Debug.print die Werte der Variablen - hier also str - anzeigen lassen. Dann kommst du dem was noch nicht rund läuft schneller auf die Spur.

Ich entnehme deinem Edit, dass jetzt alles "funzt" *wink.gif* ?
Ansonsten wiederhole ich meine Frage von vor ach ich weiß nicht: Gibt es in der Tabelle T_Kundendaten ein Feld namens "Maschine"?
maike

 

Hi,

leider nein. Da die Abfrage immer noch nicht für zwei Werte funktioniert.
Warum ich das nochmal in ein Textfeld übergebe ist zur Kontrolle.
Es klappt halt das er beide Werte die ich auswähle in die Abfrage packt,
aber er gibt mir keine Werte aus.
Ja in der T_Kundendaten gibt es ein Feld Names Maschine.
Die Daten aus dem Listenfeld kommen aus der Tabelle T_Maschine Feld Maschine.
Gruß

Daniel

 

So langsam sollten wir mal zu Potte kommen...

Dann solltest du dich aber auch für die Variante mit den Hochkommata entscheiden!

So kann es also nicht funktionieren.

Lade doch bitte mal eine Beispiel-DB hoch, an der man sich das anschauen und richtigstellen kann.
Wenn du dann anschließend eine funktionsfähige Lösungvor dir hast, erkennst du vielleicht, was du falsch gemacht hast.

 

Hallo Anne,

hier die Datenbank. Vielen Dank schonmal

Gruß

Daniel

 

Wie erwartet ist das Datenfeld "Maschine" in der Tabelle "T_Kundendaten" vom Typ Text, also müssen die Vergleichswerte in Hochkommata gesetzt werden.

Wenn dann noch das zu öffnende Formular "F_EADM" die Abfrage "A_EADM" als Datenherkunft hätte, würde das ganze Spielchen evtl. sogar Sinn machen.

PS:
Was den anschließenden Mail-Versand betrifft, so solltest du die Eingabefelder vor Verwendung prüfen, ob sie nicht evtl. leer (=NULL) sind. Und ein Anhang ist ja sicher nicht Pflicht...

 

Ich erkenne hier einen leichten Groll. *Smilie

 

Morgen zusammen,

@anne: Vielen Dank für die Hilfe.
Ich hatte die Datenquelle gestern geändert, da ich sonst keine Daten mehr bekommen habe.
Das mit der Mail ist ein guter Tipp. Werde das mit der Überprüfung hinzufügen. Der Anhang ist aber schon ein Pflichtfeld,
da ich möchte das der Anwender den Anhang in der Datenbank einfügt.

@Alle: Ich danke euch für die Hilfe.

Gruß

Daniel