Top-Themen

Aktuelle Themen (A bis Z)

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit
GELÖST

Instr Funktion - wie einbauen ?

Frage Entwicklung VB for Applications

Mitglied: Entwickler

Entwickler (Level 1) - Jetzt verbinden

16.08.2007, aktualisiert 17.08.2007, 4453 Aufrufe, 10 Kommentare

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
Mitglied: 8644
16.08.2007 um 12:10 Uhr
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!

01.
if resultvalue = 'men' then resultvalue = 'menge' 
02.
...
Ist wahrscheinlich syntaktisch nicht richtig, aber so könnte es gehen.
Bitte warten ..
Mitglied: Entwickler
16.08.2007 um 13:20 Uhr
hoi,

nein mit mit instr kann man das automatisieren, dass er einfach ähnliche nimmt.
sonst könnt ich ja 100000 millionen abfragen machen
Bitte warten ..
Mitglied: 8644
16.08.2007 um 14:47 Uhr
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
Bitte warten ..
Mitglied: Entwickler
16.08.2007 um 15:11 Uhr
und wie bauch ich das in meine formel ein ?
Bitte warten ..
Mitglied: 8644
16.08.2007 um 15:16 Uhr
Vielleicht so:
01.
If InStr(1, valueresult, "Men", 0) Then valueresult = "Menge"
oder so ähnlich

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

Psycho
Bitte warten ..
Mitglied: Entwickler
16.08.2007 um 16:07 Uhr
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 ?
Bitte warten ..
Mitglied: bastla
16.08.2007 um 21:46 Uhr
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:
01.
If InStr(UCase(Value(500,100)), UCase(Value(25,69))) > 0 Then 
02.
'ist enthalten 
03.
Else 
04.
'ist nicht enthalten 
05.
End If
Grüße
bastla
Bitte warten ..
Mitglied: Entwickler
17.08.2007 um 08:22 Uhr
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 ...
Bitte warten ..
Ähnliche Inhalte
Festplatten, SSD, Raid
2TB-SSD: Einbau - und dann?
gelöst Frage von donnyS73lbFestplatten, SSD, Raid6 Kommentare

Hallo zusammen, ich habe da eine Frage zum Thema "SSD": Ich habe eine "Samsung 850 PRO SATA III 2,5 ...

HTML
Textdokument in HTML einbauen
gelöst Frage von deinernstjetztHTML2 Kommentare

Hallo, ich möchte in HTML ein Textdokument für zb. AGB's einbauen. Das sollte in einem ca 200x200px Feld angezeigt ...

Festplatten, SSD, Raid
MSIG41M-P26 und SSD einbauen
gelöst Frage von zzbaronFestplatten, SSD, Raid2 Kommentare

Hallo, ich habe ein MSIG41-P26 (MS7592) Mainboard in meinem PC und würde gern eine SSD einbauen. Wie ich aber ...

Datenbanken
Variablen einbauen Access
gelöst Frage von Dr.CornwallisDatenbanken2 Kommentare

Hallo zusammen, Ich möchte in einer Abfrage eine Variable einbauen. Jetzt habe ich ein Modul mit folgenden Code angelegt: ...

Neue Wissensbeiträge
Viren und Trojaner

Deaktivierter Keylogger in HP Notebooks entdeckt

Information von bitcoin vor 8 StundenViren und Trojaner1 Kommentar

Ein Grund mehr warum man Vorinstallationen der Hersteller immer blank bügeln sollte Der deaktivierte Keylogger findet sich im vorinstallierten ...

Router & Routing

Lets Encrypt kommt auf die FritzBox

Information von bitcoin vor 12 StundenRouter & Routing

In der neuesten Labor-Version der FB7490 integriert AVM unter anderem einen Let's Encrypt Client für Zugriffe auf das Webinterface ...

Internet

Was nützt HTTPS, wenn es auch von Phishing Web-Seiten genutzt wird

Information von Penny.Cilin vor 3 TagenInternet17 Kommentare

HTTPS richtig einschätzen Ob man eine Webseite via HTTPS aufruft, zeigt ein Schloss neben der Adresse im Webbrowser an. ...

Webbrowser

Bugfix für Firefox Quantum released - Installation erfolgt teilweise nicht automatisch!

Erfahrungsbericht von Volchy vor 4 TagenWebbrowser8 Kommentare

Hallo zusammen, gem. dem Artike von heise online wurde mit VersionFirefox 57.0.1 sicherheitsrelevante Bugs behoben. Entgegen der aktuellen Veröffentlichung ...

Heiß diskutierte Inhalte
Batch & Shell
Trusted Sites für alle User auf dem PC einpflegen
Frage von xXTaKuZaXxBatch & Shell12 Kommentare

Aufgabestellung: Es sollen auf 1 PC (bzw. mehreren PCs) vertrauenswürdige Sites per Powershell eingetragen werden, die für alle User ...

Voice over IP
Telefonstörung - Ortsrufnummern kein Verbindungsaufbau
Frage von Windows10GegnerVoice over IP10 Kommentare

Hallo, sowohl bei uns als auch beim Opa ist es über VoIP nicht möglich Ortsrufnummern anzurufen. Es kommt nach ...

Vmware
DOS 6.22 in VMWare mit CD-ROM
gelöst Frage von hesperVmware8 Kommentare

Hallo zusammen! Ich hab ein saublödes Problem. Es ist eine VMWare mit DOS 6.22 zu erstellen auf dem ein ...

Cloud-Dienste
PIM als SaaS Nutzungsgebühr
Frage von vanTastCloud-Dienste8 Kommentare

Moin, wir haben uns ein PIM (Product Information Management) nach unseren Ansprüchen für viel Geld als SaaS-Lösung bauen lassen. ...