Office: (Office 2003) Zeichenfolge abschneiden ab einem bestimmten Zeichen

Hallo,
ich würde gerne eine Zeichenfolge vor einem bestimmten Zeichen zurückgeben lassen. Zum Beispiel alle Zeichen links vom "x", so es überhaupt in der Zeichenfolge erscheint:
derb => derb
hallox => hallo
tagx => tag
usw.
Tatsächlich ist das x immer ganz rechts, so es auftaucht.
Ehrlich gesagt bin ich mir ja sicher, dass so eine einfache Sache schon zigmal im Forum beschrieben wurde, aber ich finde einfach nicht die Suchfunktion für die Archive. Wenn mir jemand sagen kann, wie man hier suchen kann oder wo man es findet, ansonsten eine Antwort schadet auch nicht.
P.S.: Früher war das alles so userfreundlich aufgebaut, heute findet man nichts mehr wieder....

:)

 

Antworte ich mir mal selber, da es mir gerade wieder einfiel:

Left(Me!Feld, InStr(1, Me!Feld, "x") - 1)

Aloah!

 

Wenn das x immer das letzte Zeichen ist würd ich wohl mit
mid(String,1, len(string)-1) arbeiten

Ob der Syntax jetzt so richtig ist weiß ich nicht. Aber die VBA Hilfe sagt dazu mehr.
Mid schneidet aufjedenfall die Zeichen aus String aus und zwar von 1 bis "länge des Textes - 1" also genau bis vorm x.
klappt aber nur wenn dein x immer am schluss steht.

Wenn dann könnte man wohl mit "instr" nach dem x suchen und den rückgabewert in mid verwenden.

PS: Die Suche findest im zweiten Querbalken, gleich unter den Forenstrukturanzeige.
Da gibts was Suche und Dieses Forum durchsuchen.

CuCu

 

Danke für die Hilfe, habe nur leider ein Problem damit, wenn kein "x" am Ende auftaucht. Dann gibt es Mecker weil ungültiger Prozeduraufruf bzw. ungültiges Argument. Wie kann man das geschickt und schnell verklauseln, ne Idee?

 

Schon wieder kam ich mir selbst zuvor *wink.gif*

If [Bedingung] = True And Right(Me!Feld, 1) = "x" Then Me!Feld = Left(Me!Feld, InStr(1, Me!Feld, "x") - 1) Else Me!Feld = Me!Feld

Vielleicht hilft's mal jemanden *cool.gif*