Can I use conditional sections in VBA number formats

[grahamj]

I like the ability to use conditions, such as [<100], or colours, such as [Red], in custom number formats in cells.

But can I use these, or an equivalent, using Format in VBA?

My current requirement is something like this:

shtCalendar.Cells(rt, cPlace) = shtEvents.Cells(r, cEventPlace) & Chr(10) & Format(shtEvents.Cells(r, cEventTime), "[=0]""Midnight"";[=0.5]""Noon"";h.mm am/pm")

Using other forms within the format expression, such as \N\o\o\n, or "[=0]" & Chr(34) & "Midnight" ..., don't help.

Is it something that Format does not cater for?

Thanks

 

[Yongle]

Here is a way to format the cell by VBA ...

Range("A:A").NumberFormat = "[Red][<=100];[Blue][>100]"

Try
- recording a macro as you number format a cell manually and tailoring the recorded macro to what you want

 

[RoryA]

No, it doesn't, but you could use Application.Text instead.

 

[grahamj]

Ah. Thank you, Rory.
Replace Format(... in my code with WorksheetFunction.Text(...

Works great.