Discussion :

[langelot222]

Bonjour
je voudrais enlever des valeurs d'un rowsource d'une liste déroulante.
on va dire que l'alimentation du row source est le nom des services ( service1, service2, service3).
Si service1 existe deja alors il ne reste plus que service2 et service3 dans le rowsource.

si service1 et service2 existe alors il n'y a plus que service3 , bien entendu je veux une solution générique, en codage en dur on balance des constantes et des if et c'est plié, sauf que l'a, il faut que ce soit adaptable et générique.

existe -t-il une fonction vb permettant de passer en paramètre les valeurs du rowsource et celle(s) que l'on veut enlever ?

[mout1234]

adaptable et générique

Hummm... commences par nous préciser comment tu alimentes ta liste déroulante (liste de valeurs / requêtes) et comment tu détermines les éléments à enlever...

existe -t-il une fonction vb permettant de passer en paramètre les valeurs du rowsource et celle(s) que l'on veut enlever ?

Vu ta question, je suppose que tu alimentes par code une liste de valeurs. Reste donc à adapter ton code pour le rendre plus générique...

Si service1 existe deja ...

Si cela se traduit par la présence d'une information dans une table, on peut parfois obtenir le comportement attendu en traitant cela dans la requête source de ta liste déroulante. Un simple requery de la liste suffit alors.

[langelot222]

voici le ocode d'alimentation de la liste

Code :

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

1
2
 
cRaisonSoc.RowSource = "SELECT preneur.cRaisonSoc from preneur where preneur.cnomsite=cnomsiteP.value"

effectivement on trouve les valeurs dans une table remplie préalablement et on cherche les différents services sur un site donné en paramètre.

sur ta dernière remarque tu dis que l'on peut requeter dessus pour en enlever ? comment faire?

[mout1234]

tu dis que l'on peut requeter dessus pour en enlever ? comment faire?

Par une requête du genre "non correspondance".

Par exemple (non testé):

Code SQL :

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

SELECT preneur.cRaisonSoc from preneur  Left Join déjàPris on preneur.cRaisonSoc  = déjàPris.cRaisonSoc WHERE déjàPris.cRaisonSoc  Is Null