Etikettenzähler

Hallo,
wir nutzen zur Zeit eine Funktion, um einen zusätzlichen Zähler auf dem Etikett anzudrucken. Den Wert, bis zu dem hochgezählt werden soll, holt sich das Programm aus dem ERP-System, berechnet wird er dann aus der laufenden Nummer des Etiketts. . Leider bekomme ich das nur für Werte <=9 hin, jetzt benötige ich aber 16.
Die Formel sieht so aus:
if
(
StrPos( IdentNr, ‘#’) >= 0,
'Nest: ’ +
FStr$
(
if
(
StrPos(ArtText, ‘#’) <= 0,
1+Val(Mid$(ArtText, StrPos(ArtText, ‘#’)+1, Len(ArtText) - StrPos(ArtText, ‘#’))) + (Int(Val(Zaehler) - 0.5) % if(Val(Mid$(IdentNr,Len(IdentNr)-1,1))>0,Val(Mid$(IdentNr,Len(IdentNr)-1,1)),1)),
1
),
‘&’
),
‘’
)

Wer kann helfen ?