Format monetary amount to 9 digits with No decimals without rounding
I need to convert a standard dollar amount (eg 157.62) to a 9-digit
number without decimals or rounding (eg 000015762). The formulas I've
tried so far a
For Each rw In ActiveSheet.UsedRange.Rows
If Application.CountIf(rw, "*monetary*") 0 Then
With rw
.NumberFormat = "0000000.00;(0000000.00)"
End With
End If
Next
Which formats as "0000157.62". And:
For Each rw In ActiveSheet.UsedRange.Rows
If Application.CountIf(rw, "*monetary*") 0 Then
With rw
.NumberFormat = "000000000;(000000000)"
End With
End If
Next
Which formats as "000000158".
Does such a thing exist? Any assistance would be greatly appreciated.
Thanks in advance.
|