Datensatz suchen mit Kombifeld

Computer: Software & Programmierung Microsoft Access
#1

Hallo,

A2000. Ich rufe mit einem Kombifeld einen Datensatz auf, was auch
mit der FindFirst-Methode bisher gut funktioniert.
Nun möchte ich mich bei der Datensatzsuche nicht mehr nur auf ein Feld im Kombifeld beschränken, sondern mich auf zwei Felder beziehen.
Wie muss ich den Code ändern?

Dim rs As Object

Set rs = Me.Recordset.Clone
rs.FindFirst „[Produkt] = '“ & Me![Kombinationsfeld57] & „’“
Me.Bookmark = rs.Bookmark

Kann mir jemand weiterhelfen?

Gruß
Andreas

#2

Hallo

Du kannst die einzelnen Spalten eines Kombinationsfeld mit einem Index ansprechen, zB:

Me!Kombinationsfeld57.Column(4)

Gruss Matthias

#3

Am effizientesten geht das, wenn du im Kombifeld den Primärschlüssel mitführst (ggf. die Spalte ausblenden) - dann kannst du bei einem Feld bleiben (und das Feld wie erwähnt über die Columns-Eigenschaft aus dem Kombifeld holen).

Gruß aus dem Norden
Reinhard Kraasch (http://www.kraasch.de - Access Tipps & Tricks)

#4

Hallo,
die Sache ist, ich verwende einen zusammensgesetzten Primärschlüssel (ein Zahlenfeld + ein Textfeld). Das Problem ist es jetzt in der FindFirst-Anweisung einen Ausdruck für beide Felder zu erstellen. Gibts da eine Lösung?

Danke Andreas

[Bei dieser Antwort wurde das Vollzitat nachträglich automatisiert entfernt]

#5

Na, dann etwa:

RS.Findfirst "Zahlenfeld = " & Me!Kombifeld.Column(0) & \_
 " AND Textfeld='" & Me!Kombifeld.Column(1) & "'"

Gruß aus dem Norden
Reinhard Kraasch (http://www.kraasch.de - Access Tipps & Tricks)

Hallo,
die Sache ist, ich verwende einen zusammensgesetzten
Primärschlüssel (ein Zahlenfeld + ein Textfeld). Das Problem
ist es jetzt in der FindFirst-Anweisung einen Ausdruck für
beide Felder zu erstellen. Gibts da eine Lösung?

Danke Andreas

#6

Hi

ich bin nicht sicher, was Du meinst:

ZWEI Kombinationsfelder für gemeinsame Bedingung?

rs.FindFirst "[Feld1] = '" & Me![Kombinationsfeld1] & "' AND [Feld2] = '" & Me![Kombinationsfeld2] & "'"

Oder das Ergebnis zweier Kombinationsfelder zusammensetzen?

rs.FindFirst "[Feld1] = '" & Me![Kombinationsfeld1] & Me![Kombinationsfeld2] & "'"

Wenn die Werte aus zwei Combo-Spalten nur aneinandergehängt werden sollen:

rs.FindFirst "Feld1 = '" & Kombinationsfeld1.Column(0, Kombinationsfeld1.ListIndex) & Kombinationsfeld1.Column(1, Kombinationsfeld1.ListIndex) & "'"

Wenn das es nicht trifft, dann bitte das Problem nochmal ein wenig detaillierter beschreiben!

Gruß
(Woly)

#7

Ja, genau das ist es!
Danke!!!

Andreas