To remove the minus sign you could do this:
if cDbl(text) >= "0" then
text = "{green}" & text
else
text = "{red}" & mid(text,2)
end if
mid(text,2) will strip the first character off of the negative value (which should be the minus sign).
Note that I also change the first line from cInt to cDbl so that this function works better with negative decimal values.
#XPression