Suchen Sie in Excel nach mehreren Werten und markieren Sie sie

Question

Ich muss 105 Zahlen aus einer Liste mit 650 Zahlen suchen und sie markieren, wenn sie gefunden werden. Gibt es eine einfachere Möglichkeit, dies zu tun? Beispiel: Spalte x in Excel hat 10 Werte und ich muss 5 Werte in Spalte x suchen und markieren. (Natürlich ist die Zahl in Wirklichkeit größer)

Answer 1

Wenn Sie die Kurzliste in der SpalteAund die lange Liste in der SpalteBwie:

Ausführen dieses Makros:

Sub dural()
   Dim nA As Long, nB As Long, v As Variant
   Dim a As Long, b As Long
   nA = Cells(Rows.Count, "A").End(xlUp).Row
   nB = Cells(Rows.Count, "B").End(xlUp).Row

   For a = 1 To nA
      v = Cells(a, "A").Value
      For b = 1 To nB
         If Cells(b, "B").Value = v Then
            Cells(b, "B").Interior.ColorIndex = 6
         End If
      Next b
   Next a
End Sub

wird herstellen: