help macro facile

[chomou]

Bonjour,

Je débute en VBA et j'éprouve quelques difficultés.
Est-ce quelqu'un peut écrire la macro qui réalise la fonction suivante :
J'ai une liste de chiffres en colonne A et une liste de chiffres en colonne B.
Pour chaque chiffre de la colonne A, si chiffreA = n'importe quel chiffre présent dans la colonne B, alors colorier fond cellule du chiffre A en vert

Merci d'avance

loic

 

[job75]

Re : help macro facile

Bonjour chomou, bienvenue sur XLD,

Appliquer à la colonne A une Mise en forme conditionnelle (MFC) avec la formule :

=NB.SI(B:B;A1)

Rechercher sur le forum pour plus d'explications...

Edit : vous parlez de chiffres, je suppose que vous voulez dire nombres non ? Un chiffre c'est un caractère...

A+

 

[mromain]

Re : help macro facile

bonjour chomou et bienvenue sur le forum, job75

sinon, une solution par macro :

Sub test()
Dim i As Integer, laCell As Range
With ThisWorkbook.Sheets("Feuil1")
    For i = .Cells(.Rows.Count, 1).End(xlUp).Row To 1 Step -1
        Set laCell = Nothing
        Set laCell = .Columns(2).Find(what:=.Cells(i, 1).Value, LookIn:=xlValues, lookat:=xlWhole)
        If Not laCell Is Nothing Then .Cells(i, 1).Interior.Color = 65280 Else .Cells(i, 1).Interior.Pattern = xlNone
    Next i
End With
End Sub

a+