Hello everyone

i am cleaning a massive fine that contacts emails.

the problem is that there are also Emoji and when i run the below formula, the emojis are kept

=TRIM(RIGHT(SUBSTITUTE(LEFT(A1,FIND("@",A1)-1)," ",REPT(" ",99)),99))&MID(A1,FIND("@",A1),FIND(" ",A1&" ",FIND("@",A1))-FIND("@",A1))

is there a way to remove all of the emojis in one go?

The file is 175000 rows so any help is appreciated