Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Fehlermeldung bei WorksheetFunction.Find !

Forumthread: Fehlermeldung bei WorksheetFunction.Find !

Fehlermeldung bei WorksheetFunction.Find !
04.10.2002 11:24:10
Ronny
Hallo zusammen,

ich möchte abfragen, ob eine Zelle eine Bezeichnung beinhaltet inklusive einer If Bedingung.

Als Worksheetlösung sähe das beispielsweise so aus:

Die Zelle D7 hat den Inhalt: "Size: Midi 3 x"

In Zelle E7 käme die Formel: =IF(ISNUMBER(Find("Midi";D7));"gefunden";"nicht gefunden")

Diese Lösung funktioniert.
Mache ich das gleiche in VBA, funktioniert es nur,
wenn das Kriterium "Midi" vorhanden ist, ansonsten
bekommen ich die Fehlermeldung: "Unable to get the
find property of the WorksheetFunction Class".

Meine fehlerhafte VBA Lösung:

Material = Zelleninhalt (als String wie auch Varianttype versucht)

If IsNumeric(Application.WorksheetFunction.Find("Midi", Material)) then
....
end if

Hat jemand eine Lösung dafür ?
Besten Dank im voraus.

Ronny.D

Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Re: Fehlermeldung bei WorksheetFunction.Find !
04.10.2002 12:44:34
Jürgen
Hallo Ronny,

versuch's mal mit der Find-Methode:

Viel Glück
Jürgen

Re: Fehlermeldung bei WorksheetFunction.Find !
04.10.2002 12:45:16
Chris
If ActiveSheet.Cells(7, 4).Formula Like "*" & "Midi" & "*" Then
MsgBox ("vorhanden")
Else
MsgBox ("nicht vorhanden")
End If


Gruss
Chris

Re: Fehlermeldung bei WorksheetFunction.Find !
04.10.2002 13:44:40
Ronny
Hallo,

Danke für die Antworten.
Inzwischen habe ich den Tip bekommen,
es ohne "WorksheetFunction" zu probieren,
also nur "Application.Find".
Funktioniert einwandfrei.

Warum verstehe ich allerdings nicht, da
unter "Application." kein Find angezeigt
wird (nur FindFile oder FileFind), unter
"WorksheetFunction." schon.

Aber man muß ja nicht alles verstehen !

Noch einen schönen Tag. Gruß Ronny

Anzeige
;

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige