Many blank cells are found!
Anyway, try again with array formula:
=SUMPRODUCT(IF(COUNTIF(A3:A35,A3:A35)=0,"",1/COUNTIF(A3:A35,A3:A35)))+COUNTIF(A3:A35,"E-MAIL")-1
Confirmed with ctrl-shift-enter