Faire fonctionner une case à cocher sur excel Résolu/Fermé

Question

Bonjour,

Je souhaiterai intégrer une case à cocher sur une feuille excel qui permettrait en la cochant de remplir les valeurs de 3 cellules.

Par exemple, en cochant la case appelée "séance", la cellule en A1 prendrai la valeur 3500, la cellule en A2 se remplirai avec 1:20 (pour 1h20) et la cellule en A3 prendrai la valeur 5.

Ainsi, avant que ma case soit cochée les cellules A1, A2 et A3 seraient vides puis une fois la case cochée ces cellules prendraient les valeurs que j'ai indiqué.

J'aimerai aussi que les cellules redeviennent vides si toutefois je décochais la case.

Est-ce possible et comment dois-je faire ? (je suis vraient nul en VBA)

Merci d'avance.

michel_m · Accepted Answer

bonjour,

Pas besoin de VBA pour traiter ce problème !!!

avec la barre outils formulaire case à cocher
avec format de controle
tu choisis une cellule liée par exemple: E14 (généralementon cache  la cellule  sous la case  à cocher pour faire joli)
dans A1 tu aurais cette fomule
=Si(E14;3500;"")
tu n'as pas besoin de marquer si(E14=VRAI.....etc) car E14 renvoie vrai ou faux (coché-pas coché)
m^me punition pour A2 et A3 (attention au format pour A2)

avec la boite à outil contrôle  (checkbox)
clic droit-propriétés-linked cell  saisir E14
pareil après

pijaku · Answer

Re
Affichage / Barre d'outils / Boîte à outils contrôles
Tu cliques sur la case à cocher et tu la dessines dans ta feuille (ou tu veux, aucune importance)
Double clic sur la case à cocher et colles ce code :

Private Sub CheckBox1_Click()
If CheckBox1.Value = True Then
[A1] = 3500
[A2] = "1:20"
[A3] = 5
Else
[A1] = ""
[A2] = ""
[A3] = ""
End If
End Sub
ferme la fenêtre visual basic et dans la barre d'outils "boite à outils controles" désactive le mode création.

nemotri · Answer

Ok merci à vous ça fonctionne nickel.

Faire fonctionner une case à cocher sur excel

3 réponses

Discussions similaires