Formating cells in VBA

[Fibo]

Hello,
I am trying to format a cell in vba using unicode.
The end result that the cell value should remain a figure, and its format should have a colored unicode charater.
The unicode number and its color should be defined by VBA.
The problem I have is the bellow doesn't work.
Range("E55").NumberFormat = "[Red]unichar(10004)#,###"
The vba editor wont paste

✐​

either.
Anoyone has an idea?

 

[ISY]

Hi

Range("E55").NumberFormat = "[Red]" & WorksheetFunction.Unichar(10004) & "#,###"

 

[Fibo]

Hello,
I am trying to format a cell in vba using.
The format should use a unicode character, like a check mark for example.
The unicode number and its color should be defined by VBA.
The problem I have is taht the code bellow doesn't work.
Range("E55").NumberFormat = "[Red]unichar(10004)#,###"
The vba editor wont paste

✐

either.
Anyone has an idea?
Also I posted this question before I had corrected the typos by accident.
Is there a way to edit my question instead of posting it again?

Hi

Range("E55").NumberFormat = "[Red]" & WorksheetFunction.Unichar(10004) & "#,###"

Perfect.
Of course.
Thank you.