Office: Funktion Länge in Abfrage

Hallo Leute,

ich möchte gerne in einer Abfrage die Funktion Länge dazu nutzen um einen String mit Zeichen zu Füllen.

Meine Abfrage sieht folgendermaßen aus:

IIf(Len([materialnummer])="5","000" & [Materialnummer]))

Leider funktioniert dieses nicht in der Abfrage.

Ist an der Abfrage was falsch ?

Gruß
Mauritius

:)

 

An der Abfrage nicht, aber an der Befehlssequenz. Das Ergebnis von Len() bzw. Länge() ist eine Zahl und kein Text. Lass die Hochkommatas weg und schreibe

=5;......

Arno

 

Hallo Arno,

das habe ich auch schon probiert, das sah dann folgendermaßen aus:

IIf(Len([Materialnummer])=5,"000" & [Materialnummer])))

Auch auf diese Weise habe ich kein Ergebnis bekommen.

Gruß
Mauritius

 

Hi Mauritius,

dein SQL$ könnte dann evtl. so ähnlich aussehen wie

Code:

 

Hi Rudolf,

das sieht vom Ansatz her gut aus. Aber dat verdammte Ding will nicht.

IIf(Len([Materialnummer])=5,Str(Len([materialnummer]) & "000" & [Materialnummer])))

So geht es also auch nicht. Das muß doch irgendwie machbar sein.

Gruß
Mauritius

 

Poste mal die ganze SQL (bitte lesbar, das heißt ggf. zeilenumbrüche etc. einfügen), dann kann man auch sehen wozu und in welchem zusammenhang du das einbaust.

 

Hi Arno,

anbei der Code:

SELECT OffeneAufträge.Auftraggeber, OffeneAufträge.Auftragsnummer, OffeneAufträge.Auftragsposition, OffeneAufträge.Warenempfänger, OffeneAufträge.Fälligkeitsdatum, OffeneAufträge.Materialnummer, OffeneAufträge.OffeneMenge, OffeneAufträge.Einheit, OffeneAufträge.KummMenge
FROM OffeneAufträge
WHERE (((OffeneAufträge.Materialnummer)=IIf(Len([Materialnummer])=5,Str(Len([materialnummer]) & "000" & [Materialnummer]))));

Zweck der ganzen Geschichte ist, dass das Feld Materialnummer bei z. B. 5 Stellen mit 3 Nullen vorne aufgefüllt wird. Also vorher 12345 und nachher 00012345.

Gruß
Mauritius

 

Hi Mauritius,

probier doch mal

WHERE (((OffeneAufträge.Materialnummer)=Str(Len([materialnummer]) & "000" & [Materialnummer]));

[bitte Anzahl der Klammern checken *wink.gif* ]

Ansonsten sieht es für mich so aus, als wenn du am Besten "zwei Durchläufe" machst, d.h. in einer Abfrage NUR den len- Part feststellen und in der zweiten dein UPDATE [darauf wird's dann wohl hinauslaufen, gelle *wink.gif* ], ohne IIF ...

 

Hallo,
wenn du mit der Abfrage bezwecken willst, das die Materialnummern die 5 Stellig mit drei nullen auffüllen möchtest, sollte der Code so aussehen:

SELECT OffeneAufträge.Auftraggeber, OffeneAufträge.Auftragsnummer, OffeneAufträge.Auftragsposition, OffeneAufträge.Warenempfänger, OffeneAufträge.Fälligkeitsdatum, IIf(Len([Materialnummer])=5,"000" & [Materialnummer],[Materialnummer]) AS Material_nummer, OffeneAufträge.offeneMenge, OffeneAufträge.Einheit, OffeneAufträge.KummMenge
FROM OffeneAufträge;

 

Hi Jens,

das geht !!! SUPER und VIELEN DANK !!

Gruß
Mauritius

 

Ansonsten währe die IMHO bessere Alternative gewesen die Materialnummer weiterhin als Zahlenfeld zu führen und in der Format-Eigenschaft des Tabellenentwurfs die entsprechende Anzahl Nullen einzugeben. Dann wird

12345

auch als

00012345

angezeigt, ohne das man die Feldtypen "vergewaltigen" müßte!

Gruß

Arno

 

Ja Arno, du hast Recht in diesem Fall hatte ich einfach keine andere Wahl.

Aber ansonsten bin ich auf jeden Fall kein Feldtypen-Vergewaltiger ganz ehrlich !!

Gruß
Mauritius

 

Ja Arno, du hast Recht in diesem Fall hatte ich einfach keine andere Wahl.

Aber ansonsten bin ich auf jeden Fall kein Feldtypen-Vergewaltiger ganz ehrlich !!

Gruß
Mauritius

 

Hallo Mauritius,,
für diese Umsetzungen solltest du dir auch den Befehl String$ ansehen.

z.B.

Function Materialnummer(vInhalt As Variant) As String

Const Laenge_vInhalt = 3
If IsNull(vInhalt) Or vInhalt = 0 Then
Materialnummer = String$(Laenge_vInhalt, "0")
Else
If Len(vInhalt) < Laenge_vInhalt Then
Materialnummer = String$(Laenge_vInhalt - Len(vInhalt), "0") & vInhalt
Else
Materialnummer = vInhalt
End If
End If
End Function

Gruss

Jo