Függvényes megoldás a kukac-ok számára.

=SUMPRODUCT(--(MID(A1,ROW(A1:INDIRECT("A"&LEN(A1))),1)="@"))