Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Case à cocher

Créer une discussion
  • Initiateur de la discussion Initiateur de la discussion 3dbillard
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

S'inscrire
3

3dbillard

Guest
Bonsoir,
je dispose d'un tableau ou je voudrai pouvoir choisir par une case à cocher, si les chiffres sont à 3 décimales quand la case est coché et 2 décimales quand elle n'est pas coché. Un petit fichier joint pour être plus clair.
Bonne soirée à tous et merci.
 

Pièces jointes

Trier par date Trier par votes
Re : Case à cocher

Bonjour 3dbillard
Essayez ce code :
VB: 
Sub Macro1()
  With Range("D7,D9,D11,D13,D15,D17,D19")
    If .NumberFormat = "0.00" Then .NumberFormat = "0.000" Else .NumberFormat = "0.00"
  End With
End Sub
​
ROGER2327
#4951

Samedi 21 Gueules 138 (Lavement, V)
27 Pluviôse An CCXIX
2011-W07-2T22:30:35Z
 
Vote positif 0 Vote négatif
Re : Case à cocher

Bonjour

Une autre façon de faire

Code: 
Sub Macro1()
Dim R As Range
Set R = [D7,D9,D11,D13,D15,D17,D19]
    R.NumberFormat = IIf(R.NumberFormat = "0.00", "0.000", "0.00")
End Sub

Bonne journée
 
Vote positif 0 Vote négatif
Identifiez-vous ou inscrivez-vous pour participer.
Rejoins nos membres "Supporter XLD" et booste ton expérience Excel !
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

F
  • Question Question
Microsoft 365 MFC et case à cocher
Réponses
5
Affichages
212
Francky79
F
E
  • Résolu(e)
XL 2019 Cases à cocher
Réponses
5
Affichages
358
Phil69970
F
  • Résolu(e)
XL 2019 Création de cases à cocher dynamiquement
2
Réponses
22
Affichages
760
mapomme
  • Question Question
Power Query Ajout case à cocher
Réponses
1
Affichages
232
scraper
S
D
  • Résolu(e)
Microsoft 365 Case à cocher Excel 365 si cochée alors décoche l'autre
Réponses
12
Affichages
586
dacunha
D
C
  • Question Question
XL 2021 Case a cocher
2
Réponses
15
Affichages
469
clausen
C
S
  • Question Question
XL 2016 case à cocher
Réponses
10
Affichages
411
job75
M
  • Question Question
Microsoft 365 Ajout de cas à cocher et mise en forme conditionnelle dans un tableau Excel
Réponses
9
Affichages
634
mimednejma
M
A
  • Résolu(e)
Microsoft 365 Insertion case à cocher
2
Réponses
18
Affichages
1 K
mapomme
N
  • Résolu(e)
XL 2019 Macro pour copier ligne avec case à cocher liée
Réponses
12
Affichages
556
Phil69970
N
  • Résolu(e)
Microsoft 365 Case à cocher pour statut
Réponses
10
Affichages
678
mapomme
D
  • Résolu(e)
Microsoft 365 Case à cocher apparait si une autre case est cochée
3 4 5
Réponses
66
Affichages
2 K
oguruma
O
  • Question Question
XL 2019 Piocher dans une case pour en compléter une autres.
Réponses
7
Affichages
545
Oska51
O
M
  • Question Question
XL 2016 pb création de tableau par macro
Réponses
10
Affichages
411
ChTi160
I
  • Question Question
XL 2016 Supprimer "vrai" ou "faux" dans une case à cocher
Réponses
6
Affichages
2 K
migau
P
  • Question Question
Microsoft 365 Aide pour case à cocher - checklist
Réponses
11
Affichages
2 K
AtTheOne
J
  • Question Question
Microsoft 365 répartition des pourboire au service
Réponses
6
Affichages
377
Jean-Eric
Y
  • Résolu(e)
XL 2013 Macro si changement dans case à cocher
Réponses
6
Affichages
689
Yvan1
Y
  • Résolu(e)
Microsoft 365 [VBA] Listes dynamiques selon cases à (dé)cocher
2
Réponses
18
Affichages
1 K
alexga78
A
  • Question Question
XL 2021 Couper-coller une ligne en cochant une case.
2
Réponses
20
Affichages
1 K
Roxyy
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…