Excel : listes déroulantes conditionnelles.

Hello et merci de ta réponse,

Je ne comprends pas cette formule et du coup, je ne sais pas où il faudrait la placer.

Cath

Ok,
alors la solution de Mita devrait convenir pour avoir le prix, en choisissant selon le fournisseur et le produit.
mais ne marche que si dans votre base de données,vous avez le nom du fournisseur sur toutes les lignes produits sans exception

Soir pour l'exemple:

base de données sur feuil1
_votre liste de fournisseur de A1 à A1000
_votre liste de produits en Feuil1 de B1à B1000
_votre liste de prix de C1 à C1000

toutes les cellules de A ont un nom de fournisseur en face du produit en B

dans la feuille d'édition, feuil2
en A2; la liste de choix du fournisseur
en B2 la liste de choix du produit en conséquence
en C2 la formule:
=SOMMEPROD(('Feuil1'!$A$1:$A$1000=A1)*('Feuil1'!$B$1:$B$1000=B1)*($C$1:$C$1000))
vous donnera la valeur de C correspondante au fournisseur et au produit choisit.

Note:
1°)marche uniquement si les deux conditions groupées sont présentes une seule fois dans les listes, sinon, donne le total des identiques.
2°) cette formule ne fonctionne que pour ressortir des valeurs num et ne peut pas, par exemple, éditer des références si elles ne sont pas numériques.

Revenez si quelques soucis, n'hésitez pas.



bonne chance

crdlmnt

... suite avec une autre option, les contraintes sont les mêmes, mais celle ci peut ressortir les références si elles ne sont pas num:
avec les mêmes données que message précédent:
=INDEX('feuil1'!$C:$C;EQUIV($A1&$B1;'feuil1'!$A:$A&'feuil1'!$B:$B;0))
cette formule est matricielle et doit être entrée avec la touche enter en maintenant les touches ctrl et shift enfoncées.
(elle doit se retrouver automatiquement entre accolades dans la barre de formule.
Vous pouvez éditer ainsi n'importe quel champ de votre base de données en modifiant le champ de INDEX($C:$C dans l'exemple)
attention aux blocages $ si vous copiez la formule.
crdlmnt

Ahhhh ! Merci, merci, merci !

Et merci aussi à Mytå qui a parlé de la SOMMEPROD.

Ta première proposition fonctionne parfaitement et j'ai réglé le problème de la référence qui m'affiche un 0 par une mise en forme conditionnelle, comme ça, quand j'aurai les références, elles réapparaîtront toute seules.

Merci pour le pas à pas qui m'a bien aidée à adapter mes formules à mon cas.

Cordialement

Cath

Pas de quoi, c'est, comme vous le faites, bien sur Mita qu'il faut remercier.

Petite info:
si vous ne voulez pas du tout d'affichage de 0 dans votre feuille, vous pouvez éviter la MFC avec: Clic sur logo Microsoft en haut à gauche / option excel en bas de la fenêtre
à gauche: "options avancées"
et cherchez dans liste la ligne :"afficher un 0 quand la cellule à une valeur nulle " et décochez la.
vous ne verrez plus de 0

si excel avant 2007: même chose mais barre d'outil / option onglet affichage
crdlmnt

Oui, c'est vrai, je connais le truc également.

Merci encore.

Cath

Je ne sais pas si c'est parce que je n'ai pas mis les bon numéros de colonne (ou lettres selon le cas), ou bien si c'est parce que je ne tape jamais une donnée, mais la choisis dans une liste déroulante, mais ça ne fonctionne pas.

Dans le code que tu m'as donné, j'ai remplacé B &row par D &row parce que mes désignations à supprimer sont dans cette colonne (de D18 à D55) et C par I où sont stockées les quantités à commander.
Dans if Target.Column = 1, j'ai laissé 1 parce que ma liste déroulante maître (fournisseurs) est en colonne A.

Mais ces changements bloquent mon Excel 2007 qui semble incapable de résoudre la macro ou quand j'inverse les changements, m'efface les coordonnées du fournisseurs qu'une RECHERCHEV affichait.

Bref ! Me voici bien perplexe ;-).

Cath

re
je ne suis pas un grand spécialiste des macros!!! à priori il ne veut pas prendre plus de deux cellules à la fois.
donc essayez celui ci pour contourner le problème


Private Sub Worksheet_Change(ByVal Target As Range)
On Error Resume Next
Dim Rw As Long
If Target.Column = 1 Then
Rw = Target.Row
Range("B" & Rw, "D" & Rw).Select
Selection.ClearContents
Range("I" & Rw).Select
Selection.ClearContents
End If
End Sub

chez moi et sauf erreur, il marche!
voila le modèle

http://www.cijoint.fr/cjlink.php?file=cj201110/cijOx5Sbqi.xls

crdlmnt

Ok ! Je crois comprendre - grâce à ton classeur - pourquoi ça ne fonctionne pas.

En effet, mes fournisseurs n'apparaissent pas dans une colonne du bon de commande, mais dans une cellule au niveau des coordonnées (équivalant au destinataire du bon de commande) et ils sont accessibles par le biais d'une liste déroulante maître et donc d'une cellule précise (A11) et ce sont les plages D18 à D55 et I18 à I55 que je veux effacer en fonction du contenu de A11.

Donc ma foi, merci beaucoup de t'être penché sur ma question, mais je vais continuer de prospecter, il y a sans doute une solution.

Cordialement

Cath

suite
on a encore un peu de ressources:

au même endroit:

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$A$11" Then
Range("D18:D55,I18:I55").Select
Selection.ClearContents
End If
End Sub

crdlmnt

Yessssss !

Un tout dernier truc : quelle phrase dois-je inclure pour que les cellules ne restent pas sélectionnées.

Je sais, j'abuse ;-).

En tout cas, un immense merci à toi.

cath