Faire fonctionner une case à cocher sur excel

Résolu
nemotri Messages postés 175 Date d'inscription   Statut Membre Dernière intervention   -  
nemotri Messages postés 175 Date d'inscription   Statut Membre Dernière intervention   -
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.
A voir également:

3 réponses

michel_m Messages postés 16602 Date d'inscription   Statut Contributeur Dernière intervention   3 315
 
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
9
pijaku Messages postés 12263 Date d'inscription   Statut Modérateur Dernière intervention   2 761
 
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.
1
nemotri Messages postés 175 Date d'inscription   Statut Membre Dernière intervention   35
 
Ok merci à vous ça fonctionne nickel.
0