VBA convert string into double

[ww4612]

those following numbers are stored as string. I would like to convert them into double. I tried to used VBA recorder. But it does not record the code.
any solutiom?
[TABLE="class: grid, width: 500"]
<tbody>[TR]
[TD]0.0016
[/TD]
[TD][TABLE="width: 64"]
<colgroup><col width="64"></colgroup><tbody>[TR]
[TD="class: xl65, width: 64"]2,815,993[/TD]
[/TR]
</tbody>[/TABLE]
[/TD]
[TD][TABLE="width: 64"]
<colgroup><col width="64"></colgroup><tbody>[TR]
[TD="class: xl65, width: 64"]0.02%[/TD]
[/TR]
</tbody>[/TABLE]
[/TD]
[TD]1.00
[/TD]
[TD]1.663E-06
[/TD]
[/TR]
</tbody>[/TABLE]

 

[ww4612]

You should be able to use the WorksheetFunction.Text to do the conversions. Consider the following...

Sub Test()

  Dim StringValue As String, DoubleValue As Double
  
  StringValue = "2,815,993"
  MsgBox WorksheetFunction.Text(StringValue, "General")
  
  StringValue = "0.02%"
  MsgBox WorksheetFunction.Text(StringValue, "General")

End Sub

thank you for the code. it works well.

 

[GTO]

Hi Rick,

Thank you for the clear explanation; very helpful

Mark