View Single Post
  #5   Report Post  
Posted to microsoft.public.excel.worksheet.functions
jwbuyer jwbuyer is offline
external usenet poster
 
Posts: 12
Default reverse conditional formatting

did I do something wrong, I keep getting the error that "this formula takes
no arguments." Forgive me, this is my first time editing visual basic in
excel

"Mike H" wrote:

Hi,

Alt +F11 to open vb editor right click 'this workbook' and insert module
and paste the code below in.

call with

=isred(A1)

Function isred(rng As Range) As String
Application.Volatile
If rng.Font.ColorIndex = 3 Then
isred = "New"
Else
isred = ""
End If
End Function

Mike

"jwbuyer" wrote:

the problem is that I was handed a worksheet that has the cells formatted
manually as opposed to being conditionally formatted.

"Mike H" wrote:

Hi,

If you post the conditional format formula that turns the text red then it
should be possible write a formula that will check the same condition and
return the text string you requires but what you can't do is have a formula
along the lines of

=if(a1=red text,"new",something else)

Mike

"jwbuyer" wrote:

I want a formula to return the the text string "new" if another cell in the
same row has red colored text. How do I do this?