VBA Double as String with comma and not point

Question

I am searching for a solution to convert a double to a string, but the string should have a comma before the decimal place, not a point.

"One and a half" should look that way 1,5 (german notation).

Thanks for your help!!

Answer 1

A combination of CStr and Replace will do the job.

Function Dbl2Str(dbl As Double) As String
    Dbl2Str = Replace(CStr(dbl), ".", ",")
End Function