Choix multiple avec CheckBox

[chanu]

Bonjour,
je débute sur VBA et j'ai un petit soucis à propos de mes checkbox. En effet, chaque checkbox à une macro d'attribuée et un j'ai un bouton de commande qui me permet de lancer les macros en fonctions des checkbox cochées.
Mais le souci c'est que lorsque je coche plusieurs checkbox le bouton de commande me lance uniquement la macro de ma checkbox cochée en première.

Est-ce que quelqu'un aurait une idée?


Merci d'avance.

 

[chanu]

Re : Choix multiple avec CheckBox

Voici le début de mon code :
If btAcier = True Then
Workbooks.Open Filename:= _
"........xls"
chantier.Hide
Worksheets(2).Select

If CheckAcier = True Then
Call Filtre_Chantiers_Aciers
End If


ElseIf btAutresMtx = True Then
Workbooks.Open Filename:= _
"..........xls"
chantier.Hide
Worksheets(1).Select
Call Filtre_Chantiers_AutresMtx
If CheckFonte.Value = True Then
Call Assainissement_Fonte

ElseIf CheckPVC.Value = True Then
Call Assainissement_PVC

ElseIf CheckBois.Value = True Then
Call Bois
....
End If
End If

Voilà si ça peut vous aider

 

[chanu]

Re : Choix multiple avec CheckBox

Chaque macro active un filtre horizontal en gros ça affiche par ex L10 à L80 pour Assainissement_Fonte

Peut-être que le fait de combiner ces filtres ne marchent pas mais dans ce cas je sais pas comment faire ;(

 

[GCFRG]

Re : Choix multiple avec CheckBox

Bonjour, tu peux essayer ceci:

Public Sub CHK(ByRef Uform As UserForm)
    Dim Ctrl As Control
    For Each Ctrl In Uform.Controls
        If TypeOf Ctrl Is MSForms.CheckBox Then
If Ctrl.Name = "btAcier" And Ctrl.Value = True Then
       [COLOR="DarkRed"]"Ton action"[/COLOR]
ElseIf Ctrl.Name = "..........." Then
      [COLOR="DarkRed"]"Ton action"[/COLOR]
       Etc...
End If
   Next Ctrl
   Set Ctrl = Nothing
End Sub

Cordialement Gilbert

 

[GCFRG]

Re : Choix multiple avec CheckBox

Salut , Joint ton fichier sans données confidentielles

Gilbert

 

[chanu]

Re : Choix multiple avec CheckBox

Désolé pour le retard j'ai pas internet le we 😀
Voici le petit programme, par contre j'ai du le simplifier afin de pouvoir le zipper et l'envoyer

 

[GCFRG]

Re : Choix multiple avec CheckBox

Bonjour, ton fichier à tester,comme je n'ai pas tous les éléments je ne peut pas le faire correctement.

il faut que tu remettes toutes les données dedans pour pouvoir tester.

Gilbert

 

[chanu]

Re : Choix multiple avec CheckBox

Je vais le tester dans la journée en tout cas merci de s'être penché sur mon cas