Double Value in text to be displayed as 410.0 rather than 410

Hi,

I am running into an issue and I need help from VBA Experts here..

Below is part of a text string which I am trying to dynamically generate.

The Value 55 will come from somewhere, say Cell A1

"ValueOfDelta":55.0

If I type the below in the Immediate Window

?"""" & "ValueOfDelta" & """" &":" & [A1]

I get answer as "ValueOfDelta":55 (notice the .0 being omitted). I want the String to be displated as "ValueOfDelta":55.0 (With .0 trailing)

I cannot have it as text, for example "ValueOfDelta":"55.0"

I am communicating a DLL which needs a Double. If I omit .0, then it stops working.

Any help please?

Hi,

I was able to solve the issue like this 0

application.WorksheetFunction.Substitute(CheckValueType(Format(CDbl(1#), "###0.0")),"""","")

CheckValueType was a UDF

Thanks for the help