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

XL 2019 Additionner des valeurs lorsque une case est cochée

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 !

Bonjour tout le monde,

Mais non JM27, tu n'es pas transparent ! 😉

Comme je n'aime pas les cases à cocher (ni les boutons d'option) quand il y en a beaucoup, une proposition où la "coche" s'inscrit dans la cellule où on double-clique
Activer les macros à l'ouverture du fichier
 

Pièces jointes

Bonjour à tous

J'étais sur la même piste et pour les mêmes raisons que @Modeste qui la fait en bien mieux que moi.
Mais pourquoi pas sur "Worksheet_SelectionChange" au lieu de "Worksheet_BeforeDoubleClick"

VB:
Sub Worksheet_SelectionChange(ByVal Target As Range)
    If Not Intersect(Target, [B39:E48]) Is Nothing Then
        If Target.Count > 1 Then Exit Sub
        temp = Target.Address
        Application.EnableEvents = False
        Cancel = True
        Cells(Target.Row, 2).Resize(1, 4) = vbNullString
        Range(temp) = "ü"
        Application.EnableEvents = True
    End If
End Sub

J'ai juste rajouté un "sierrreur" dans la colonne F

@Phil69970
 

Pièces jointes

- 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

Discussions similaires

Réponses
12
Affichages
936
Réponses
5
Affichages
4 K
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…