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

Colone à cocher + compteur

  • Initiateur de la discussion Initiateur de la discussion Titoy
  • 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 !

T

Titoy

Guest
Hello everybody !

J'ai un truk byzarre qui vient de m'arriver !
J'ai 3 colonne . A, B et C
En A et C je veux double clik sur cellule et insérer un "X"
jusque là c'est ok.
Mon petit soucis est que mon code prend en compte la colonne B alors que je ne l'ai pas indiquez ?😕?

En B je voudrais un système qui m'incrémenterai ma cellule de 1 en 1 jusqu'à trois et supprime ma ligne entière si 3 est atteint !
( ce code là par contre je sais pas faire)

COuld you help me ???

Merci beaucoup

Bonne journée à tous

TITOY
 

Pièces jointes

Re : Colone à cocher + compteur

Bonjour Titoy, le forum,

Vois si cela te convient.
(Pas trop compris l'histoire d'incrémentation)

Code:
Private Sub Worksheet_BeforedoubleClick(ByVal Target As Range, Cancel As Boolean)
    If Not Intersect(Target, Range("a5:a15", "c5:c15")) Is Nothing And Target.Cells.Count = 1 Then
        If Target.Column = 1 Or Target.Column = 3 Then
            If Target.Value = "" Then Target.Value = "X" Else Target.Value = ""
        Else
            Target = Target + 1
            If Target = 3 Then Target.EntireRow.Delete
        End If
        Cancel = True
    End If
End Sub

A+
 
- 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.
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…