entwickler
Goto Top

Instr Funktion - wie einbauen ?

Hallo Lieben Leute,

habe folgendes Problem.
Ich habe eine Formel, bei der eine Inputbox aufgeht, nun kann man da zb: Menge eingeben. ich möchte aber, dass wenn man nur Men eingibt auch Menge kommt, kann man da irgendwie einen abgleich herstellen
oder das wenn man megne eingibt auch menge kommt.

Die Formel ---

If Value(0,40) <> 1 then
ResultValue = Value(500,100)
Else
ResultValue=inputbox("Geben Sie bitte den Filter ein!" & vbnewline & "", "Filter-Eingabe"," ")
End If



sollte sich da einer einfach tuen, bitte direkt die formel wieder richtig reinposten thx

PS: 0,40 u. 500,100 sind einfache variablen

lg

alex

Content-Key: 66356

Url: https://administrator.de/contentid/66356

Ausgedruckt am: 28.03.2024 um 09:03 Uhr

Mitglied: 8644
8644 16.08.2007 um 12:10:29 Uhr
Goto Top
Hi,

oder das wenn man megne eingibt auch menge kommt

...oder wenn man gmeen eingibt auch menge kommt?

Da kommen aber schon einige Kombinationen zusammen!

if resultvalue = 'men' then resultvalue = 'menge'  
...

Ist wahrscheinlich syntaktisch nicht richtig, aber so könnte es gehen.
Mitglied: Entwickler
Entwickler 16.08.2007 um 13:20:18 Uhr
Goto Top
hoi,

nein mit mit instr kann man das automatisieren, dass er einfach ähnliche nimmt.
sonst könnt ich ja 100000 millionen abfragen machen
Mitglied: 8644
8644 16.08.2007 um 14:47:35 Uhr
Goto Top
Was instr kann, ist einen Teilstring in einem Gesamtstring zu suchen. Dein Beispiel mit "men" würde gehen, das mit "megne" nicht. Guckst du hier!

Psycho
Mitglied: Entwickler
Entwickler 16.08.2007 um 15:11:58 Uhr
Goto Top
und wie bauch ich das in meine formel ein ?
Mitglied: 8644
8644 16.08.2007 um 15:16:28 Uhr
Goto Top
Vielleicht so:
If InStr(1, valueresult, "Men", 0) Then valueresult = "Menge"  

oder so ähnlich

Psycho
Mitglied: Entwickler
Entwickler 16.08.2007 um 15:31:56 Uhr
Goto Top
men menge is nurn bsp das muss auf alle eingaben funktionieren
Mitglied: 8644
8644 16.08.2007 um 16:04:50 Uhr
Goto Top
Ich bin zwar jetzt kein Fachmann, aber ohne, dass du alle Eventualitäten prüfst, wird es wohl nicht gehen.

Psycho
Mitglied: Entwickler
Entwickler 16.08.2007 um 16:07:47 Uhr
Goto Top
sry - habe die falsche formel gepostet, ich hoffe mit der gehts nun wirklich ;)

If ucase(Value(25,69)) = ucase(value(500,100)) then
ResultValue = value(25,21)
Else
ResultValue = ""
End if


also das instr muss statt dem ersten = also
If ucase(Value(25,69))---> instr <--- ucase(value(500,100)) then

nur wie weiter ?
Mitglied: bastla
bastla 16.08.2007 um 21:46:58 Uhr
Goto Top
Hallo Entwickler!

Wenn Du überprüfen willst, ob Value(25,69) [=kürzer Text] in Value(500,100) [=längerer Text] (ohne Unterscheidung von Klein- und Großbuchstaben) enthalten ist, wäre die Schreibweise so:
If InStr(UCase(Value(500,100)), UCase(Value(25,69))) > 0 Then
'ist enthalten  
Else
'ist nicht enthalten  
End If

Grüße
bastla
Mitglied: Entwickler
Entwickler 17.08.2007 um 08:22:30 Uhr
Goto Top
If Instr(1,trim(Ucase(Value(25,69))),trim(Ucase(Value(500,100)))) <> 0 then

habs nun so gelöst, danke an alle
nun funkts ...