=SUMPRODUCT((A1:A100<>"")/COUNTIF(A1:A100,A1:A100&""))
counts unique cell values within A1:A100, excluding blank cells and ones with an empty string ("").
How does it do that? Example:
A1:A100 =    [1,   1,   2,   "apple", "peach", &qu...