Listbox et combobox

Chombi

XLDnaute Occasionnel
Bonjour à tous

je butte sur un truc de base: je voudrai juste afficher un Msg box si les valeurs des 2 combobox est présent dans une des lignes de la listbox (ficher joint)

Voir dans "Private Sub ComboBox4_Change( )"

Merci
 

Pièces jointes

  • Test2.xlsm
    24.9 KB · Affichages: 34

Chombi

XLDnaute Occasionnel
Bonjour à tous
Petite précision : il faut d'abord sélectionner un client dans la box 5 pour que la listbox se remplisse
ensuite si on sélectionne un produit et une quantité déjà présente dans la listebox je voudrai avoir un Msgbox comme quoi le produit sous ce conditionnement a déjà été entré

j'ai l'impression que c'etait pas très clair
 

PMO2

XLDnaute Accro
Bonjour,
Peut être comme cela
VB:
Private Sub ComboBox4_Change()
Dim i As Long
'---
With ListBox10
  For i = 0 To .ListCount - 1
    If .List(i, 0) = Me.ComboBox2 And .List(i, 1) = Me.ComboBox3 Then
      MsgBox "Produit avec ce conditionnement deja existant", vbExclamation, _
             "ATTENTION ... !"
      Exit Sub
    End If
  Next i
End With
End Sub
 

JBARBE

XLDnaute Barbatruc
Bonjour à tous,
Peut-être ceci à condition bien entendu que la ComboBox5 soit sélectionnée en dernier !
(désolé pas vu la solution précédente )
Bonne journée !
 

Pièces jointes

  • Combo_listebox.xlsm
    30.4 KB · Affichages: 39

Chombi

XLDnaute Occasionnel
Merci JBARBE

je ne voyais pas la solution comme cela mais je vais m'en inspirer
l'idée de rappeler le produit sélectionné dans le MsgBox est sympa

C'est vraiment le coté extra de ce forum il nous ouvre souvent les yeux et nous fait découvrir de nouveaux
horizons.
Une source d'info si rapide, ça m'étonnera toujours et continuera de m'enthousiasmer (c'est un vieux qui parle)

Merci encore
 

Discussions similaires

Membres actuellement en ligne

Statistiques des forums

Discussions
312 196
Messages
2 086 099
Membres
103 116
dernier inscrit
kutobi87