Consejo: Otros idiomas son traducidos por Google. Puedes visitar el English versión de este enlace.
Iniciar sesión
x
or
x
x
Suscríbete
x

or

¿Cómo eliminar algunos caracteres especiales de la cadena en Excel?

Si hay algunos caracteres especiales como % ^ Y * () dentro de las cadenas de texto, y ahora, desea eliminar estos caracteres específicos de las cadenas de celdas. Eliminarlos uno por uno llevará mucho tiempo, aquí, presentaré algunos trucos rápidos para resolver esta tarea en Excel.

Elimine algunos caracteres especiales de la cadena de texto con la función definida por el usuario

Elimine algunos caracteres especiales de la cadena de texto con Kutools para Excel


Elimine caracteres numéricos, alfa u otros caracteres especiales de la cadena de texto:

Kutools for Excel's Eliminar personajes característica puede ayudarlo a eliminar rápidamente todo numérico, alfa, no numérico, no alfa, no impresión, otros personajes específicos de las cadenas de texto que necesita. Haga clic para descargar y probar gratis Kutools for Excel Now!

doc eliminar caracteres especiales 7

Kutools for Excel: con más de 200 útiles complementos de Excel, de prueba sin límite en días 60. Descargar y prueba gratis ahora!


flecha azul burbuja derecha Elimine algunos caracteres especiales de la cadena de texto con la función definida por el usuario


El siguiente código de VBA puede ayudarlo a eliminar los caracteres específicos que necesita, por favor haga lo siguiente:

1. Mantenga pulsado el botón ALT + F11 teclas para abrir el Microsoft Visual Basic para aplicaciones ventana.

2. Hacer clic recuadro > Móduloy pegue el siguiente código en Módulo Ventana.

Código de VBA: elimine algunos caracteres especiales de la cadena de texto

Function RemoveSpecial(Str As String) As String
'updatebyExtendoffice 20160303
    Dim xChars As String
    Dim I As Long
    xChars = "#$%()^*&"
    For I = 1 To Len(xChars)
        Str = Replace$(Str, Mid$(xChars, I, 1), "")
    Next
    RemoveSpecial = Str
End Function

3. A continuación, guarde y cierre este código, vuelva a la hoja de trabajo e ingrese esta fórmula: = eliminar especial (A2) en una celda en blanco donde desea poner el resultado, vea la captura de pantalla:

doc eliminar caracteres especiales 1

4. Y luego arrastre el controlador de relleno hasta las celdas donde desea aplicar esta fórmula, y todos los caracteres especiales que no necesita haber eliminado de la cadena de texto, vea la captura de pantalla:

doc eliminar caracteres especiales 2

Nota: En el código anterior, puede cambiar los caracteres especiales # $% () ^ * & a otros que quieras eliminar


Si no eres experto en el código VBA, Kutools for Excel, Eliminar personajes la utilidad puede ayudarlo a terminar esta tarea de manera rápida y fácil.

Kutools for Excel : con más de 300 útiles complementos de Excel, de prueba sin límite en días 60.

Después de instalar Kutools for Excel, por favor, así que de la siguiente manera:

1. Seleccione las cadenas de texto que desea eliminar algunos caracteres especiales.

2. Haz click Kutools > Texto > Eliminar personajes, mira la captura de pantalla:

doc eliminar caracteres especiales 3

3. En la Eliminar personajes cuadro de diálogo, verificar Personalizado Bajo el Eliminar personajes sección, e ingrese los caracteres especiales que desea eliminar, vea la captura de pantalla:

doc eliminar caracteres especiales 4

4. Y luego haz clic Ok or Aplicar botón, los caracteres que especificó en el Personalizado cuadro de texto se han eliminado de las cadenas de texto a la vez, ver capturas de pantalla:

doc eliminar caracteres especiales 5  2 doc eliminar caracteres especiales 6

Haga clic para descargar y probar gratis Kutools for Excel Now!


Kutools for Excel: con más de 200 útiles complementos de Excel, de prueba sin límite en días 60. Descargar y prueba gratis ahora!


Kutools for Excel: la mejor herramienta de productividad de Office aumenta su productividad en un 80%

  • Super Formula Bar (edite fácilmente varias líneas de texto y fórmula); Diseño de lectura (lee y edita fácilmente un gran número de celdas); Pegar en rango filtrado...
  • Combinar celdas / filas / columnas y mantener datos; Contenido de celdas divididas; Combinar filas duplicadas y suma / promedio... Prevenir células duplicadas; Comparar rangos...
  • Seleccione Duplicado o Único Filas; Seleccionar filas en blanco (todas las celdas están vacías); Super Find y Fuzzy Find en muchos libros de trabajo; Selección aleatoria ...
  • Copia exacta Celdas múltiples sin cambiar la referencia de fórmula; Crear referencias automáticamente a múltiples hojas; Insertar viñetas, Casillas de verificación y más ...
  • Fórmulas favoritas e insertadas rápidamente, Gamas, cuadros y cuadros; Cifrar celdas con contraseña Crear una lista de correo y enviar correos electrónicos ...
  • Extracto del texto, Agregar texto, Eliminar por posición, Eliminar espacio; Crear e imprimir subtotales de paginación; Convertir entre contenido de celdas y comentarios...
  • Súper filtro (guardar y aplicar esquemas de filtro a otras hojas); Clasificación avanzada por mes / semana / día, frecuencia y más; Filtro especial por negrita, cursiva ...
  • Combinar libros de trabajo y hojas de trabajo; Combinar tablas basadas en columnas clave; Dividir datos en varias hojas; Conversión por lotes xls, xlsx y PDF...
  • Funciona con Office 2007-2019 y 365, y es compatible con todos los idiomas. Es fácil de implementar en su empresa. Funciones completas de prueba gratuita de 60-day.
pestaña kte 201905

Office Tab lleva la interfaz con pestañas a Office y hace que su trabajo sea mucho más fácil

  • Habilitar la edición y lectura con pestañas en Word, Excel, PowerPoint, Editor, Acceso, Visio y Proyecto.
  • Abra y cree varios documentos en nuevas pestañas de la misma ventana, en lugar de en nuevas ventanas.
  • ¡Aumenta tu productividad en un 50% y reduce cientos de clics de ratón por ti todos los días!
fondo officetab
Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    Nick DeCastro · 25 days ago
    Rather than searching for specific special characters, how about if you want to search for and replace ALL special characters. In other words, how would you write the search for NOT one of the following characters: "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789"
    • To post as a guest, your comment is unpublished.
      skyyang · 11 days ago
      Hi, Nick,
      Do you want to remove all ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789 characters from the cells?
      Looking forward to your reply, thank you!
      • To post as a guest, your comment is unpublished.
        Nick DeCastro · 11 days ago
        No. I want to keep only "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789"
        • To post as a guest, your comment is unpublished.
          skyyang · 10 days ago
          Nick,
          Maybe the below VBA code can solve your problem, please try:

          Sub RemoveNotAlphasNotNum()
          Dim Rng As Range
          Dim WorkRng As Range
          On Error Resume Next
          xTitleId = "KutoolsforExcel"
          Set WorkRng = Application.Selection
          Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
          For Each Rng In WorkRng
          xOut = ""
          For i = 1 To Len(Rng.Value)
          xTemp = Mid(Rng.Value, i, 1)
          If xTemp Like "[a-z.]" Or xTemp Like "[A-Z.]" Or xTemp Like "[0-9.]" Then
          xStr = xTemp
          Else
          xStr = ""
          End If
          xOut = xOut & xStr
          Next i
          Rng.Value = xOut
          Next
          End Sub


          Hope it can help you!
  • To post as a guest, your comment is unpublished.
    Kim · 6 months ago
    Hmm I wonder, does it only work in the worksheet you've originally pasted the code in?
    As for that one it only seems to work, not for any new workbook you open
    • To post as a guest, your comment is unpublished.
      skyyang · 6 months ago
      Hello, Kim,
      The VBA code can only applied in one workbook, if you want to apply it in a new workbook, you should copy and paste the code into your new workbook again.
      Thank you!
  • To post as a guest, your comment is unpublished.
    Kim · 6 months ago
    Hi guys,

    I've applied the =removespecial(A2) code and it works perfectly in one worksheet but then in the other it gives me an invalid #NAME? error.
    I checked the "format cells" and it's both on general and I've copied the same text + formula to both worksheets but it won't work.
    Any clue what this might cause this?

    Thanks and thank you so much for this code.
    Saves me hours and hours of work!

    Regards, Kim
  • To post as a guest, your comment is unpublished.
    Deepak · 1 years ago
    Function GetWordWOSpecChar(Rng As Range)
    'paste in VBA module, Use as a Formula
    'Created by Deepak Sharma
    Arr = Array("48", "49", "50", "51", "52", "53", "54", "55", _
    "56", "57", "65", "66", "67", "68", "69", "70", "71", "72", "73", "74", "75", _
    "76", "77", "78", "79", "80", "81", "82", "83", "84", "85", "86", "87", "88", _
    "89", "90", "97", "98", "99", "100", "101", "102", "103", "104", "105", "106", _
    "107", "108", "109", "110", "111", "112", "113", "114", "115", "116", "117", _
    "118", "119", "120", "121", "122")

    For i = 1 To Len(Rng.Value)
    txt = Mid(Rng.Value, i, 1)
    For g = 1 To UBound(Arr)
    If txt = Chr(Arr(g)) Then GetWord = Right(Rng.Value, Len(Rng.Value) - (i - 1)): Exit Function
    Next g
    Next i

    End Function