Solved: Accounting format

[lifeson]

How do I format a column in a list view to display the value in accounting format

I used the macro recorder and got this:

[vba]Selection.NumberFormat = "_($* #,##0.00_);_($* (#,##0.00);_($* ""-""??_);_(@_)"[/vba]
But when I transfer that to my code:

[vba].ListItems(i).ListSubItems.add , , Format(total, "? #,##00.00")[/vba]

to
[vba].ListItems(i).ListSubItems.add , , Format(total, "_(?* #,##0.00_);_(?* (#,##0.00);_(?* ""-""??_);_(@_)")
[/vba]

It doesn't give the desired result

[Bob Phillips]

Some formats are not supported by VBAs Format method. Try Application.Text as an alternative.

[lifeson]

Thanks XLD
Took the simpler approach and added a column that just hold the ? sign