action sur case à cocher pour remplire plage de cellule

[bahnini mohamed]

salut les amis
je suis un prof de physique et je veut avoir une bulletin qui comporte toute les matière dans le collège
mais si la matière n'existe pas lorsque je clic sur la case a cocher tout la plage doit remplie par _ (tiré de 8)
comme indique l'exemple de tableau dans le fichier joint
merci pour tout le monde

 

[Motoa]

Re : action sur case à cocher pour remplire plage de cellule

Bonjour,

Je pense qu'en mettant une macro sur le bouton ça fonctionnerai.

Juste avec se petit morceau, ici les cellules de A1 à A10 seront rempli par un _ :

Sub test()
    Range("A1:A10").Value = "_"
End Sub

Après il ne te reste qu'à attacher le code au bouton et adapter les plages de cellules.

 

[bahnini mohamed]

Re : action sur case à cocher pour remplire plage de cellule

merci ca marche mais si je décoche la case à cocher je veut avoir une vide sans tiré de 8

 

[Robert]

Re : action sur case à cocher pour remplire plage de cellule

Bonjour le fil, bonjour le forum,

Un autre proposition avec la macro événementielle BeforeDoubleClick, qui réagit au double-clic dans une cellule, ci-dessous :

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
Dim pl As Range 'déclare la variable cel (CELlule)

If Target.Column < 6 And Target.Column > 10 Then Exit Sub 'si la cellule double-cliquée se trouve ailleurs que dans les colonnes 6 à 10, sort de la procédure
If Target.Row <> 5 Then Exit Sub 'si la cellule double-cliquée se trouve ailleurs que dans lla ligne 5, sort de la procédure
Cancel = True 'évite le mode édition lié au double-clic
Set pl = Range(Target.Offset(1, 0), Target.Offset(10, 0)) 'définit la plage p
pl.Value = IIf(Target.Offset(1, 0) = "_", "", "_") 'définit la valeur de la plage pl
End Sub

Pus besoin de case à cocher, double-clique une première fois dans une des cellules de la plage F5:J5 pour afficher, les "_", une seconde fois pour les supprimer...
Le fichier :

 

[bahnini mohamed]

Re : [RESOLU] action sur case à cocher pour remplire plage de cellule

Merci mon ami