Colorer une plage de cellule, si x en D14

Bonjour,

Voila j'aimerai créer une macro qui, lorsque j'ai tapé x en D14, la plage de cellules B20:E20 jusqu'à E23 se colore en noir, c'est possible ça ?

Comme je suis novice en la matière j'ai besoin de votre aide !

Merci d'avance
Configuration: Windows XP Internet Explorer 6.0
Excel XP
vbe 6.3

3 réponses

  1. bonjour
    essais ceci
    Private Sub Worksheet_Change(ByVal Target As Range)
    If Not Intersect([a10], Target) Is Nothing Then
    If Target.Value = "x" Then
    Range("A1:a5").Select
    for Each cell In Selection
    cell.Interior.ColorIndex = 36
    Next cell
    Else
    Range("A1:a5").Select
    For Each cell In Selection
    cell.Interior.ColorIndex = xlNone
    Next cell
    End If
    End If
    End Sub
    0
    1. Contributeur
      Bonjour,

      Sans macro, ça fonctionne très bien avec la mise en forme conditionnelle (formule : =D14="x")
      0