In[26]:= ToString[NumberForm[#, 0, ExponentStep -> \[Infinity]]] & /@ x Out[26]= {"7.5", "7500.", "75000.", "750000.", "7500000."}