Mise à jour Combobox en fonction d'une autre ComboBox

lofre

XLDnaute Nouveau
Salut les zamis,

J'ai pas mal avancé dans mon projet VBA !!
C'est fou comme ont arrive à se débrouiller grace à ce forum ... je n'y connais rien en VBA pourtant mon fichier prend de jour en jour forme !!

J'ai aujourd'hui un souci, que je n'arrive pas à surmonter (j'ai passé la soirée dessus, et j'y arrive toujours pas ...) donc si une âme charitable passe par là ;) je l'a remercie infiniment d'avance !!

Dans le fichier que je vous met il y a deux combobox qui sont liées !

Dans la première ont choisi le matériaux (3 choix possible) et ensuite dans le second ont choisi une température !
Dans la case en bleu, les données changent en fontion du matériaux sélectionné ! Cependant il n'y a pas de mise à jour en cas de changement du matériaux !

Exemple concret !

Première ComboBox je choisi "PR"
Dans la seconde "70°C"
La cellule bleu "S6" m'indique 8

Si je change maintenant la première Box et je choisi "Elastomère" la cellule "S6" reste à 8 alors que je devrais avoir un message d'erreur !!

Pour le voir, je suis obligé dans la box des température de choisir par exemple "45°C" et de reselectionner "70°C" pour enfin voir apparaitre le message d'erreur !!!

Il y a t'il un moyen de faire en sorte que la mise à jour des cellules (Message d'erreur et cellule bleu) soir automatique

Merci pour ce gros coups de pouce

Amicalement
 

Pièces jointes

  • mise a jour combobox.xlsm
    26.3 KB · Affichages: 188

bbb38

XLDnaute Accro
Re : Mise à jour Combobox en fonction d'une autre ComboBox

Bonjour Lofre, le forum,
Une solution sans macro.
Avec listes déroulantes, une colonne masquée et un tableau de données.
P.S. Bonjour Banzai64, J’attends avec impatience ta solution par macro. Salutations.
Cordialement,
Bernard
 

Pièces jointes

  • lofre.xlsm
    12.9 KB · Affichages: 163

Banzai64

XLDnaute Accro
Re : Mise à jour Combobox en fonction d'une autre ComboBox

Bonjour

Oui avec ces fichiers les contrôles ne sont pas actifs et je ne peux rien faire
Donc j'attends un .xls
Mais je ne doute pas que quelqu'un trouvera une solution : Tu en as déjà faite une

Bonne fin de nuit
 

lofre

XLDnaute Nouveau
Re : Mise à jour Combobox en fonction d'une autre ComboBox

Bonjour,

Merci pour vos réponse messieurs, et merci pour ton fichier bbb38 !

A vrai dire, j'avais commencé à faire mon fichier sans macro, mais je préfère le faire avec, paradoxalement j'y suis plus à l'aise; et je le trouve plus facile à mettre en place !

Banzai64, je te met le fichier au format XLS en fichier joint !

Je croise les doigts que ce soit possible ...

Amicalement
 

Pièces jointes

  • mise a jour combobox.xls
    43.5 KB · Affichages: 182

JNP

XLDnaute Barbatruc
Re : Mise à jour Combobox en fonction d'une autre ComboBox

Bonjour le fil :),
Code:
Private Sub ComboBox2_Change()
With Range("S4")
Select Case ComboBox2.Value
Case "Elastomère"
.Value = "1"
Case "PVC"
.Value = "2"
Case "PR"
.Value = "3"
End Select
End With
Call Traitement
End Sub
 
Sub Traitement()
With ComboBox2
Select Case ComboBox3.Value
Case "10°C"
If .Value = "Elastomère" Then
Range("S6").Value = "1"
Range("G10").Value = ""
ElseIf .Value = "PVC" Then
Range("S6").Value = "12"
Range("G10").Value = ""
Else
Range("S6").Value = "115"
Range("G10").Value = ""
End If
Case "15°C"
If .Value = "Elastomère" Then
Range("S6").Value = "2"
Range("G10").Value = ""
ElseIf .Value = "PVC" Then
Range("S6").Value = "117"
Range("G10").Value = ""
Else
Range("S6").Value = "17"
Range("G10").Value = ""
End If
'...
End Select
End With
End Sub
 
Private Sub ComboBox3_Change()
Call Traitement
End Sub
fonctionne chez moi ;). J'ai "un peu" simplifié le code :p... Il te suffira de remplacer les ... par les blocs de Case ... pour rétablir toutes tes valeurs (j'ai pas eu le courage de les faire toutes :rolleyes:).
Bon courage :cool:
 

James007

XLDnaute Barbatruc
Re : Mise à jour Combobox en fonction d'une autre ComboBox

Bonjour,

Une version sans macro ... plus souple pour les modifications éventuelles ...

A +
:)

Edit : salut Pierrot93 :) et coucou JNP :)
 

Pièces jointes

  • TestMatériau.xls
    32.5 KB · Affichages: 217

lofre

XLDnaute Nouveau
Re : Mise à jour Combobox en fonction d'une autre ComboBox

Rebonjour,

Merci encore pour votre aide !

Sans vouloir abuser, JNP, est ce qu'il te serait possible de me donner le fichier modifié ?
Encore une fois, mes connaissances sont ultra-limité, et je n'arrive pas à faire fonctionner ton code !

... sans vouloir abuser encore une fois

Amicalement
 

lofre

XLDnaute Nouveau
Re : Mise à jour Combobox en fonction d'une autre ComboBox

Ouaaaaahhhhhhh merci Banzai64 c'est nickel chrome !!

Exactement ce que je cherchais !!

Je suis au boulot, je n'ai pas trop le temps de comprendre ta macro (comment elle fonctionne), mais je me pencherais dessus ce soir !!

En tout cas merci !
 

Discussions similaires

Statistiques des forums

Discussions
312 493
Messages
2 088 956
Membres
103 990
dernier inscrit
lamiadebz