Hallo zusammen,
ich würde gerne in meiner Abfrage das Feld "Anmerkung" mit folgendem Inhalt "Ich Brauche Hilfe in einer Access Abfrage" kürzen. Sobald der Feldinhalt >40 Zeichen ist soll nach dem ersten Leerzeichen vor dem 40. Zeichen gesucht werden und der String links davon ausgeben werden.
Der oben genannte Inhalt würde dann wie folgt aussehen: "Ich Brauche Hilfe in einer Access"
LG TestUser1
LEFT() sollte dein Freund sein.
Zitatsoll nach dem ersten Leerzeichen vor dem 40. Zeichen
Hatte ich überlesen. Dann reicht Left alleine nicht
Public Function FirstForty(ByVal sText As String) As String
Dim sResult As String
sResult = Left(sText, 40)
sResult = Left(sResult, InStrRev(sResult, " "))
FirstForty = sResult
End Function