First enter this UDF:

Function whatisit(r As Range) As String
whatisit = r.NumberFormat
End Function

and then

=IF(whatisit(J2)<"hh:mm", TIME(LEFT(J2,2), RIGHT(J2,2),0),"")
--
Gary''s Student - gsnu200741


"Patrick C. Simonds" wrote:

I need a formula which will perform the calculation below, only when cell J2
is not formatted as hh:mm.


=TIME(LEFT(J2,2), RIGHT(J2,2),0)