Discussion :

[osia1]

Bonjour, le nom du sujet n'étant pas très explicite je vous expose mon bocage, j'utilise une condition if pour vérifier que la fonction d'une personne au sein d'une entreprise correspond à ce que l'on a saisie jusque la ça va mais je veux vérifier avec plusieurs fonctions de sorte à ne pas à avoir à refaire l'opération trop de fois.
Pour mieux expliquer, je saisie à l'écran plusieurs fonctions (DRH, responsable com, etc...) et je veux vérifier si j'ai dans ma table la ces fonctions là.
Je vous montre le code.

Code :

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

1
2
If (c!fonction = Me.Modifiable117) Then
...

Modifiable117 est le nom de l'endroit ou je saisie mes fonctions.
Je ne sais pas si c'est clair...


ps: Je ne vois pas comment utiliser une requête pour ça....

[osia1]

Mise à jour j'ai essayé d'utiliser une requete je vous mets le code dites moi si c'est bon...

Code :

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

1
2
3
4
5
requete_fonction = "Select * from Contact where identifiant_contact <> null"
requete_fonction = requete_fonction & " and fonction in (" & Me.Modifiable117 & ")"
set fonc = mabd.Openrecordset(requete_fonction)
If (c!fonction = fonc!fonction) then
....

Il me renvoie une erreur en me disant trop peut d'argument...

[FreeAccess]

Bonjour...

Franchement ta question est un peu confuse......

...je saisie à l'écran plusieurs fonctions (DRH, responsable com, etc...) et je veux vérifier si j'ai dans ma table la ces fonctions là

..au lieu de saisir à chaque fois tes fonctions, pourquoi ne pas les choisir à partir d'une liste déroulante....

.....tu peux également, si une fonction n'existe pas dans ta zone de liste, la rajouter directement dans ta table source.....

Regarde l'exemple de la pour t'aider à mieux comprendre....
http://access.developpez.com/faq/?page=zdl#AbsDsListe

.....en espérant que cela réponde à ton problème....

[osia1]

En fait c'est pour permettre une exportation et je voudrais sélectionner des personnes avec des fonctions différentes, pour ne pas avoir à trier dans la fiche excel ceux qui son drh ou comptable...

[FreeAccess]

...Ok...

Alors, si j'ai bien compris......

Utilise une Zone de liste (simple) avec sa propriété "Sélection multiples = Simple"..
...comme cela tu ne sélectionneras que les fonctions que tu souhaite exporter.
Tu te sers de ta sélection pour construire ta requête.....

....à voir..

[osia1]

je n'arrive pas à trouver la propriété "selection multiple" de la liste, tu pourrais me dire dans quel onglet elle se trouve??
merci


edit: c'est bon j'ai trouvé...

[osia1]

C'est presque parfait, le seul problème c'est que lors de l'exportation des résultats j'ai des peronnes qui ne corresponde pas aux fonctions recherchées peut-être que ma requête est fausse...

Code :

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

1
2
requete_fonction = "select * from Contact where Contact.identifiant_contact <> null"
requete_fonction = requete_fonction & " and Contact.fonction = ' " & Me.Liste157 &  " ' "

[osia1]

En fait quand je fais l'exportation je me rend compte qu'il me sélectionne toute la liste