Negative Currency
 

Greetings all,

I need to be able to make a series of labels in a user form to display a -ve
currency value in Red

For non -ve value I have no problem
Results.Controls("AProfit" & i) = Format(a - c, "$#,##0")

but I can't make it It trurn red with a -ve value

Results.Controls("AProfit" & i) = Format(a - c, "$#,##0;-[Red]$#,##0")

Any suggestions would be appreciated

Negative Currency
 

Use the forecolor property of the label.

--
Regards,
Tom Ogilvy

"David Adamson" wrote in message
...
Greetings all,

I need to be able to make a series of labels in a user form to display
a -ve
currency value in Red

For non -ve value I have no problem
Results.Controls("AProfit" & i) = Format(a - c, "$#,##0")

but I can't make it It trurn red with a -ve value

Results.Controls("AProfit" & i) = Format(a - c, "$#,##0;-[Red]$#,##0")

Any suggestions would be appreciated

Negative Currency
 

Thanks for that.




"Tom Ogilvy" wrote in message
...
Use the forecolor property of the label.

--
Regards,
Tom Ogilvy

"David Adamson" wrote in message
...
Greetings all,

I need to be able to make a series of labels in a user form to display
a -ve
currency value in Red

For non -ve value I have no problem
Results.Controls("AProfit" & i) = Format(a - c, "$#,##0")

but I can't make it It trurn red with a -ve value

Results.Controls("AProfit" & i) = Format(a - c, "$#,##0;-[Red]$#,##0")

Any suggestions would be appreciated