Discussion :

[jilooou]

Bonjour,
Je voudrait transformer les cellules en jaune en bouton a selectioner et leur attribuer une couleur conforme vert non conforme rouge
j'arrive a crée le bouton avec une vba mais impossible de l'insérer.

[EricDgn]

Bonjour,

Je proposerais une autre façon de faire: réagir à un double-clic sur la cellule concernée, par exemple ainsi:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
    If Target.Count = 1 Then
        If Not Intersect(Range("Conf"), Target) Is Nothing Then
            If oldValue = "" Then
                Target = "c"
            ElseIf oldValue = "c" Then
                Target = "nc"
            Else
                Target = ""
            End If
            Target.Offset(0, 1).Select  '--- force le saut sur cellule suivante
        End If
    End If
End Sub

Cordialement.