es sollen natürlich nur 5 leerzeichen sein, wenn die zahl einstellig ist. wenn sie zweistellig ist sollen es vier sein, wenn sie dreistellig ist drei usw...
der grund: ich schreibe das in ne datei und die muss nunmal so aussehen, dass diese zahl sechs zeichen einnimmt und keine voranstehenden nullen vorkommen dürfen sondern halt leerzeichen.
habs jetzt so gemacht:
Function wandleum(zahl, stellen)
Dim string1 As String
Dim string2 As String
Dim i As Integer
string1 = zahl
string2 = ""
For i = 0 To ((stellen - 1) - Len(string1))
string2 = string2 & " "
Next i
string2 = string2 & string1
wandleum = string2
End Function
weiß nicht ob das das eleganteste is, aber es geht...