Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
404to408
404to408
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Werte suchen?

Forumthread: Werte suchen?

Werte suchen?
Franz
Hallo zusammen,
ich bräuchte von euch einen kurzen Denkanstoß.
Ich möchte die Werte der Spalte A von Tabelle1 mit den Werten von Spalte B und C der Tabelle2 (beide Splten haben unterschiedlich viele Werte)vergleichen. Sobald der Wert in der Spalte B oder C gefunden wird soll der Wert, der in der Spalte D der gleichen Zeile steht, mit dem Wert in der Tabelle 1 Spalte F verglichen werden.
Wie könnte hier der VBA Code aussehen?
Hoffentlich konnte ich mein Problem vertsändlich machen?
Vielen Dank und Gruß
Franz
Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Werte suchen?
Beni
Hallo Franz,
bei diesem Code werden die übereinstimmenden Daten gelb markiert.
Gruss Beni

Sub Werte_suchen()
For i = 1 To Cells(65536, 1).End(xlUp).Row
Wert = Cells(i, 1)
For c = 2 To 3
With Sheets(2).Columns(c)
If c = 2 Then s = 3 Else s = 2
Set W = .Find(Wert, LookIn:=xlValues, LookAt:=xlWhole)
If Not W Is Nothing Then
If W(1, s) = Cells(i, 6) Then Cells(i, 1).Interior.ColorIndex = 6
End If
End With
Next c
Next i
End Sub

Anzeige
Danke, das hilft mir weiter! o.T.
31.03.2004 09:53:10
Franz
.
;

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige