I'm pretty sure this ISN'T what you want but you get the idea
Function ic()
If Application.CountIf(Range("$B$2:B2"), Range("B2")) 1 Then
ic = "D"
Else
ic = "U"
End If
End Function

--
Don Guillett
SalesAid Software

"yanf7 " wrote in message
...
Hello.
I have a function that I am constantly using.
How can I create my one custom function in Excel 97 so I can use it all
the time?
The function is:
=if(countif($B$2:B2,B2)1,"D","U"))


---
Message posted from http://www.ExcelForum.com/