2017-07-25 6 views

Antwort

0

diese Funktion versuchen:

Function TrimTrailingZeroes(BigNumber As String) As String 
    Dim i As Integer 
    For i = Len(BigNumber) To 1 Step -1 
     If Mid(BigNumber, i, 1) <> "0" Then 
      TrimTrailingZeroes = Left(BigNumber, i) 
      Exit Function 
     End If 
    Next i 
    TrimTrailingZeroes = BigNumber 
End Function 

Manchmal in eine einfache Möglichkeit, aus der Behandlung von Zahlen als Text sein kann.

+0

Danke für die Idee, aber es funktioniert immer noch nicht. Ich bekomme das Gleiche :( –

Verwandte Themen