Find-Funktion

Bild

Betrifft: Find-Funktion
von: Rob
Geschrieben am: 17.02.2005 18:46:11
Hallo,
ich habe folgendes Problem: Ich vergleiche die Spalte A von zwei verschiedenen Worksheets miteinander. Dabei verwende ich die Find()-Funktion. Leider weiss ich nicht, wie ich die Option "Match entire cells contents" aktivieren kann. "MatchCase" ist leider nicht ausreichend. (Beide Funktionen koennen bei der Suche mit Ctrl+F individuell aktiviert werden).
Beispiel:
Do Until Key = ""
With Worksheets("prev_XXX").Range("A:A")
Set c = .Find(what:=Key, SearchOrder:=xlByColumns, MatchCase:=True)
If Not c Is Nothing Then
row = row + 1
Worksheets("XXX").Select
Key = Cells(row, 1).Value
Else ...
In Buechern oder unter der Help-Funktion habe ich leider nichts finden koennen.
Gruss,
Rob

Bild

Betrifft: LookAt:=xlWhole ! o.T.
von: Josef Ehrensberger
Geschrieben am: 17.02.2005 18:52:39
Gruß Sepp
Bild

Betrifft: AW: LookAt:=xlWhole ! o.T.
von: Rob
Geschrieben am: 17.02.2005 19:07:06
Hallo Sepp,
funktionert einwandfrei. Besten Dank!
Rob
 Bild

Beiträge aus den Excel-Beispielen zum Thema "Formel per VBA "