Below are two examples on how to remove leading zeros from a string.
Text1 = Format$("00000015478", "#")
Returns 15478

Text1 = CStr(CLng("00154780"))
Returns 154780