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 "