Hallo,
Ich bin ziemlich neu im Thema Datenbanken, hab also deswegen
noch nicht ganz den Durchblick.
kommt noch 
Vielleicht könnt ihr mir ja helfen ?! 
vermutlich schon, wenn die Problematik klarer wäre…
Und zwar arbeite ich an einer Datenbank zur Kunden
verwaltung. Ich habe eine Abfrage erstellt in der die Branche1
abgefragt wird und bestimmte Werte aus Branche2 ausgegeben
werden und will jetzt diese Werte daraus in mein Formular
einfügen. Finde aber kein Beispiel wie man das auf
Kombinationsfelder überträgt.
Ein Formular ist nicht gleich ein Kombifeld…
Das Formular heißt „Kunden suche“, das erste Kombifeld
„Komi_branche1“ und wo die Werte drin stehen sollen
„Kombi_branche2“
Zwischen den zwei Tabellen > Branche1 und Branche2, ist auch
eine Beziehung zwischen. Die Abfrage wertet das auch richtig
aus aber ich will das Ergebnis nicht in einer MsgBox haben.
wie bekommst Du das Ergebnis der Abfrage in eine Msgbox?
Aktueller Code:
SELECT Branche2.branche2
FROM Branche1 INNER JOIN Branche2 ON Branche1.ID =
Branche2.ID_Branche1
WHERE (branche1.branche1) Like [Bekleidung, Dekoration,
Essen, Flitterwochen, Fotos, Räumlichkeiten, Schmuck,
Sonstiges, Unterhaltung] & „*“;
Eine solche Kriterienauflistung (hinter „Like“) kenne ich nicht…
oder soll das lediglich die „Überschrift“ für das Parameterfenster sein?
Ich vermute, Du hast ein Formular, das an Tabelle „Kunden“ gebunden ist. Darauf befinden sich zwei Kombis, mit denen Du zunächst aus einer „Branche1“ einen Wert auswählen willst, der im zweiten Kombi die dazugehörenden Werte („Branche2“) auflisten soll.
Dann geht das in etwa so:
Kombi_Branche1:
Datensatzherkunft: Select ID, Branche1 from tblBranche1 order by Branche1
Spaltenanzahl: 2
Spaltenbreiten: 0cm;4cm
Steuerelementinhalt: Leer/Nichts
mit dieser Ereignisprozedur:
Sub Kombi_Branche1_Afterupdate()
Kombi_Branche2.Requery
End Sub
Kombi_Branche2:
Datensatzherkunft: Select ID, Branche2 from tblBranche2 Where ID_Branch1 = [Kombi_Branche1] order by Branche2
Spaltenanzahl: 2
Spaltenbreiten: 0cm;4cm
Steuerelementinhalt: Leer/Nichts
Sub Kombi_Branche2_Afterupdate()
Me.Filter = "ID_Branche2= " & Me!Kombi_Branche2
Me.FilterOn=True
End Sub
„ID_Branche2“ ist in der Tabelle Kunden das Fremdschlüsselfeld für den ID-Wert aus Tabelle „Branche2“
Viele Grüße vom Bodensee
Franz, DF6GL
