Evénement Click sur checkbox

jlp035

XLDnaute Occasionnel
Bonjour,
Le suis à la recherche du petit bout de programme dans le module de classe 1 qui quand au moins une checkbox de l'userform est cochée vrai un bouton s'affiche , et quand aucune checkbox est cocheé le bouton disparait.
Pour information j'ai 7 checkbox dans l'userform.

Merci par avances de vos reponses

Jean-Luc
 

jlp035

XLDnaute Occasionnel
Re : Evénement Click sur checkbox

Bonjour Hulk,
Je te remercie pour ta prompte réponse.
Quand je clique sur une checkbox le bouton s'affiche bien mais a priori si je coche et décoche une autre checkbox le bouton disparaît alors que je souhaite qu'il reste afficher temps qu'une checkbox est encore cochée.
 

Si...

XLDnaute Barbatruc
Re : Evénement Click sur checkbox

salut

dans le Module de Classe
Code:
Public WithEvents grcbx As MSForms.CheckBox

Private Sub grcbx_Click()
  With UserForm1
    .CommandButton1.Visible = False
    For n = 1 To 7
     If .Controls("CheckBox" & n) Then .CommandButton1.Visible = True: Exit For
    Next
  End With
End Sub
 

jlp035

XLDnaute Occasionnel
Re : Evénement Click sur checkbox

J'ai utilisé le morceau de programme de "Kjin" qui fonctionne parfaitement.
Je me permets de profiter de vos compétences pour vous soumettre le problème suivant de mon programme (joint ).
Je souhaite que les feuilles sélectionnées par les cheekbox (2 à 7) correspondantes soient copier ( via une boucle )suivant le même principe que la checkbox 1 qui fonctionne.
si vous connaissez une autre methode je suis preneur.

Merci par avance

Jean-Luc
 

Pièces jointes

  • 2013_01_19(dev01) Copier fichiers.xls
    210 KB · Affichages: 24

jlp035

XLDnaute Occasionnel
Re : Evénement Click sur checkbox

Bonsoir ,
Excuser moi de ma demande ,je me suis permis de poser le problème car il est certain que les personnes qui m'ont répondu sont plus compétent que moi car j'ai chercher la solution pendant deux jours en vain une réponse qui m'a été donnée en 5 minutes.
Etant débutant en vba je cherche en premier à trouver la solution via les discussions similaire de ce très bon site.
J'ai également comme principe de régler les problèmes l'un après l'autre.

Amicalement
Jean-Luc
 

Discussions similaires

Statistiques des forums

Discussions
312 164
Messages
2 085 877
Membres
103 008
dernier inscrit
Ichaka