=SE(B1<>"";1;"")
=SE(SE.ERRORE(CERCA.VERT(B2;$B$1:B1;1;0);0)=0;MAX($A$1:A1)+1;INDICE($A$1:A1;CONFRONTA(B2;$B$1:B1;0)))