Me temo que necesitas VBA para resolverlo de una forma fácil. Una macro como tal no, pero puedes crear una UDF que te permita fácilmente limpiar los caracteres que no te interesen.
Yo he diseñado una UDF muy sencilla, totalmente personalizable:
Public Function LIMPIAR_TEXTO(ByVal vThisRange As Range)
Dim MiTexto As String
Dim i As Long
MiTexto = vThisRange.Value
'<<<<<LISTA ASCII PERMITIDA >>>>
'48 TO 57 SSon números del 0 al 9
'65 to 90 son letras del alfabeto anglosajón, en mayúsculas, A-Z
'97 to 122 son letras del alfabeto anflosajón, en minúsculas, a-z
'164 to 165 la letra Ñ en mayúscula y minúscula
'32 es el espacio
'<<<<<<<<<<<<<>>>>>>>>>>>>>>>>
For i = 1 To Len(MiTexto)
Select Case Asc(Mid(MiTexto, i, 1)) 'Sacar código Ascii de cada carácter
Case 48 To 57, 65 To 90, 97 To 122, 164 To 165, 32
LIMPIAR_TEXTO = LIMPIAR_TEXTO & Mid(MiTexto, i, 1)
Case Else
'no hacemos nada, que lo ignore
End Select
Next i
End Function
Esta UDF lo que hace es mirar el código ASCII de cada carácter. Mediante un Select, podemos elegir qué caracteres ASCII permitimos y cuales no. Ahora mismo esta UDF solamente admite números, letras sin tilde, y la letra ñ. Imagina que quieres limpiar el texto que tienes en A1, pues en B1 escribiríamos =LIMPIAR_TEXTO(A1)
Varios ejemplos:
Solamente tienes que modificar la parte que dice Case 48 To 57, 65 To 90, 97 To 122, 164 To 165, 32
con los códigos ASCII de los caracteres que sí quieras permitir. Puedes añadir que permita saltos de línea, comas, paréntesis, letras con tilde, etc.
Adáptalo a tus necesidades.
Puedes ver todos los caracteres ASCII en https://elcodigoascii.com.ar/
=SUSTITUIR( SUSTITUIR( SUSTITUIR( SUSTITUIR(B2;"&";"");"*";"");"^";"");"@";"")
. Voy a relizar una respuesta explicando como tienes que hacerlo