Discussion :

[madchemiker]

Bonjour,

j'utilise sous Access le super formulaire disponible dans un super tuto et j'en suis super content.

Cependant ma base contient des produits chimiques et chacun rentre dans une catégorie, genre alcool ou Halogène etc.

Mon problème, c'est que certains produits entrent dans plusieurs catégories, et je voudrais modifier mon code de sorte que le programme ne recherche un terme pas seulement dans une colonne "type de produits chimiques 1" mais dans toutes.
Voici mon code actuel

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
If Me.chkKlasse Then
    SQL = SQL & "And [Chemikalien_mit_CAS-Nr]![Klasse A] like '" & Me.cmbRechKlasse & "' "
End If

J'ai tenté un truc dans le genre

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
If Me.chkKlasse Then
    SQL = SQL & "And [Chemikalien_mit_CAS-Nr]![Klasse A] like '" & Me.cmbRechKlasse & "' " Or SQL = SQL & "And [Chemikalien_mit_CAS-Nr]![Klasse B] like '" & Me.cmbRechKlasse & "' " Or SQL = SQL & "And [Chemikalien_mit_CAS-Nr]![Klasse C] like '" & Me.cmbRechKlasse & "' "
 End If

Mais Access m'a bien fait comprendre que ca marche pas
Quelqu'un saurait-il comment faire pour lancer la recherche dans plusieurs tables et la code correspondant pour que la MAJ de ma liste réponse soit enfin exaustive?

Merci beaucoup

[bruno28]

Si tu essaye avec un Where

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

WHERE (((tbl.champs)= ta variable)) OR (((tbl.champs)= ta variable))

Tu peut même faire

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

WHERE (((tbl.champs) Like '*'&'" & ta variable & "'&'*')) OR ...

pour que ça cherche n'importe où dans le champs

Bon courage

Bruno

[cavo789]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
If Me.chkKlasse Then
    SQL = SQL & "And [Chemikalien_mit_CAS-Nr]![Klasse A] like '" & Me.cmbRechKlasse & "' " Or SQL = SQL & "And [Chemikalien_mit_CAS-Nr]![Klasse B] like '" & Me.cmbRechKlasse & "' " Or SQL = SQL & "And [Chemikalien_mit_CAS-Nr]![Klasse C] like '" & Me.cmbRechKlasse & "' "

Mauvaise syntaxe.

Essaie plutôt un truc du genre

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

SQL = SQL & "And ([Chemikalien_mit_CAS-Nr]![Klasse A] like '" & Me.cmbRechKlasse & "') Or  ([Chemikalien_mit_CAS-Nr]![Klasse B] like '" & Me.cmbRechKlasse & "') Or ([Chemikalien_mit_CAS-Nr]![Klasse C] like '" & Me.cmbRechKlasse & "')"

Non testé.

[madchemiker]

Testé et approuvé. MERCI cavo789!!!!!!!!!!