Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Encore des problèmes de recherche!

  • Initiateur de la discussion jpdestetienne!
  • Date de début
J

jpdestetienne!

Guest
Bonjour tout le monde,
Je vous avais écrit hier pour un problème de recherche, mais j'ai depuis réussi à faire quelques progrès tout seul!
J'ai malgré tout quelques petits soucis qui persistent!
J'aimerais, maintanant que ma fonction recherche marche, que lorsque j'ai plusieurs réference identiques, pouvoir voir tous les manchons qui existent dans cette même réference.

Ex: je veux le prix de la référence 020*030*036
Le problème est que j'ai 3 prix différents pour cette même réference!
J'aimerais donc savoir comment visualiser ces 3 prix.

Suis-je assez compréhensible?

Merçi d'avance à celui(ou ceux!) qui pourront m'aider.
Cordialement, JP
 

Pièces jointes

  • TableauXLD.zip
    35.9 KB · Affichages: 15
H

Hervé

Guest
Bonjour

En tant que stéphanois je ne pouvais rester muet.

regarde en pièce jointe.

J'ai modifié ton UF 2 en ajoutant une combobox pour choisir les dimensions.

et une listbox pour renvoyer les prix

Salut
Hervé
 

Pièces jointes

  • Tableaugeneral2.zip
    34.4 KB · Affichages: 19
J

jpdestetienne!

Guest
YEESS, c'est excellent!
Ca marche nickel!
Maintenant je vais essayer d'ajouter d'autres textbox!
Merçi beaucoup, ami stéphanois!
Et pour ce soir, un seul mot d'ordre : ALLEZ LES VERTS!!!
 
J

jpdestetienne!

Guest
Re-bonjour;
Encore une petite question : j'aimerais savoir ce que signifie ce que vous avez mis au début en VBA?
Merçi bien.


What does it mean? :

Private Sub ComboBox1_Change()
ListBox1.Clear
L = Sheets("tableau").Range("o5000").End(xlUp).Row
For Each c In Worksheets("tableau").Range("o13" & L)
If c.Value Like ComboBox1.Value Then
ListBox1.AddItem c.Offset(0, -4).Value
End If
Next c
End Sub
 

Discussions similaires

Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…