Special concatenation

[snb]

"0.00" can't be returned, since the value =0, only the formatted presentation of that value is 0.00

[DocAElstein]

"0.00" can't be returned, since the value =0, only the formatted presentation of that value is 0.00

. This seems to work, as long as The Elements are Dimensioned as a String.

Sub FormatInArray()
'Worksheet info
Dim ws1 As Worksheet: Set ws1 = ThisWorkbook.Worksheets("Sheet1") 'Sheet Info
 
Dim Data(1 To 2) As String
Let Data(1) = 0
Let Data(2) = 0
Let Data(1) = Format(Data(1), "0.00")
Let ws1.Cells(2, 4).Value = Data(1)
Let ws1.Cells(3, 4).Value = Data(2)
 
End Sub

Using Excel 2007

Row\Col	D
2	0,00
3	0

Sheet1

. But I guess that is what you are saying, sort of - To do with Formatting.. or Wotever (Whatever)

. I just did not realise that one can Put Format into Part of an Array in that way such that the output comes out in the spreadsheet like that. This is wot (what) I learned from Rick's code. That could come in handy as another "work around" I often need to cure problems I get with excel annoyingly changing comers to points, and / or changing numbers to date formats etc...