Hallo,
Habe noch eine andere Konstellation, die in das gleiche Format
soll:
38147200U00800008092752980081 soll nach dem scan 381472-00
sein.
Kannst Du mir den VB-Code dafür auch verraten?
Erster_Teil = mid(BCscan,1,6)
Zweiter_Teil = mid(BCscan,7,2)
Neuer_String = Erster_Teil & „-“ & Zweiter_Teil
oder Kurzfassung:
Neuer_String = mid(BCscan,1,6) & „-“ & mid(BCscan,7,2)
Grüße
Wolfgang
(Netwolf)