Access-o-Mania

Access-Forum (Deutsch/German) => Access-Hilfe => Thema gestartet von: Bernie110 am September 18, 2014, 22:24:04

Titel: Text Feld vor und nach Trennzeichen auslesen
Beitrag von: Bernie110 am September 18, 2014, 22:24:04
Hallo zusammen,

Ich hab folgendes Problem :

Im Feld : Art
steht folgender Inhalt

Bsp 1   : SREND/125/5/0,5
Bsp 2   : SREN/080/6/0,5

Def :  ARTCode/Breite_in_mm/Länge_in_Meter/Stärke

Ich benötige nun folgendes : zB Bsp1
Breite = 125
Länge = 5

Wie kann ich das Feld auslesen ?

Danke für eure Antworten
Lg
Bernie
Titel: Re: Text Feld vor und nach Trennzeichen auslesen
Beitrag von: MzKlMu am September 18, 2014, 23:47:49
Hallo,
das machst Du am Besten mit einer kleinen Funktion:
Public Function fncTrennen(Inhalt As String, Pos As Integer) As Double
Dim arrInhalt() As String
    arrInhalt = Split(Inhalt, "/")
    fncTrennen = arrInhalt(Pos - 1)
End Function

In einem allgemeinen Modul.

Dann in einer Abfrage, jeweils als berechnetes Feld:
Breite: fncTrennen([Art];2)
und
Länge: fncTrennen([Art];3)
Titel: Re: Text Feld vor und nach Trennzeichen auslesen
Beitrag von: Bernie110 am September 19, 2014, 00:21:15
Hallo,

das funktioniert so weit ganz gut.
Allerdings bräuchte ich hier noch eine Fehlerbehebung.
Mein Fehler, weil ich das nicht angegeben habe .sorry hierfür

Es gibt unterschiedliche Art Bezeichnungen
wie
z.b.
EF/123
V4A-SR/100
SREN/200/3/0,6/SCHEEL/HOSOKAWA
usw

Ich bräuchte den Wert 0 sobald das o.g. Beispielschema nicht erfüllt ist.

Geht das auch ?
Dann wäre ich schon zufrieden
Lg
Bernie
Titel: Re: Text Feld vor und nach Trennzeichen auslesen
Beitrag von: DF6GL am September 19, 2014, 08:13:26
Hallo,


.
.
.
If Ubound(arrInhalt) <> 3 Then
.
.
.
End If
.
.
.
Titel: Re: Text Feld vor und nach Trennzeichen auslesen
Beitrag von: Bernie110 am September 19, 2014, 12:07:41
Vielen Dank !
Klappt herrvoragend
Lg Bernie