Bonjour ,
Je galère depuis plusieurs jours ,
je cherche à faire une page de devis avec choix des composants dans une liste déroulante avec récupération de la reference et du prix du composant sélectionné ( base sur une autre feuille ).
Avec 2 listes de composants ça fonctionnait mais ...
1er problème:
Je gérait le nom des liste A & B donnant un nom a la sélection de ligne en-tete mais j avais "reference" et "prix" qui ne devaient pas apparaitre et je n'ai pas réussi a les masquer sinon ça me faisait les lignes vide dans mes menus déroulants.
Du coup je prefere cree une autre liste a part reprenant tous les en-tetes de selection mais j'ai un soucis de décalage dans mon menu deroulant B
2eme problème :
Ma base étant amenée à évoluer j ai voulu simuler l arrivée d'une nouvelle gamme d'article "C" , j'ai donc tenté de modifier les validation données de la cellule de choix pour ajouter une nouvelle liste d'article mais apparemment ca fait trop d'arguments .
=SI(NB.SI(Liste_Article;B3)=0;Liste_Article;DECALER(Choix_Article;1;EQUIV(B3;Liste_Article;0)-1;NBVAL(DECALER(Choix_Article;;EQUIV(B3;Liste_Article;0)-1))-1))
J'aimerai comprendre ce qui cloche pour pouvoir modifier soit la validation de données , soit le code VBA
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Address = "$B$3" And Target.Count = 1 Then
SendKeys "%{down}"
End If
End Sub
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$B$3" And Target.Count = 2 Then
Set C = [Liste_Article].Find(what:=Target.Value)
If Not C Is Nothing Then
SendKeys "%{down}"
Else
End If
End If
End Sub
Car par la suite j'aimerai ajouter d'autres articles , peut être recupérer d'autre information après sélection et en dernier lieux faire des liste de choix condtionnées par les choix précédents ( mais bon ça c est pour plus tard )
Donc votre me serai plus que précieuse
Merci
Bonne journée