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 encontrar y reemplazar texto específico en cuadros de texto?

Buscar y reemplazar es una herramienta útil para que podamos encontrar y reemplazar el contenido de la celda o las fórmulas de manera rápida y conveniente en una hoja de trabajo. Pero ahora, tengo varios cuadros de texto en mi hoja de trabajo, y quiero encontrar el texto específico y reemplazarlo con otro valor en estos cuadros de texto solamente. ¿Tienes alguna buena forma de lidiar con este problema?

Buscar y reemplazar texto específico en varios cuadros de texto

Ficha Office Habilite la edición y navegación con pestañas en Office y haga su trabajo mucho más fácil ...
Kutools for Excel trae las funciones avanzadas de 300 a Excel y aumenta su productividad de inmediato
  • Super Formula Bar (edite fácilmente múltiples líneas de texto y fórmulas); Diseño de lectura (lea y edite fácilmente un gran número de celdas); Pegar en rango filtrado ...
  • Combinar celdas / filas / columnas y mantener datos; Contenido de celdas divididas; Combine filas duplicadas y suma / promedio ... Prevenga celdas duplicadas; Comparar rangos ...
  • Seleccione Filas duplicadas o únicas; Seleccione 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 de varias celdas sin cambiar la referencia de fórmula; Crear referencias automáticamente a varias hojas; Insertar viñetas, casillas de verificación y más ...
  • Favorito e inserte rápidamente fórmulas, rangos, gráficos e imágenes; Cifrar celdas con contraseña; Crear lista de correo y enviar correos electrónicos ...
  • Extraer texto, Agregar texto, Eliminar por posición, Eliminar espacio; Crear e imprimir subtotales de paginación; Convertir entre contenido de celdas y comentarios ...
  • Super filtro (guardar y aplicar esquemas de filtro a otras hojas); Avanzado Ordenar 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.

flecha azul burbuja derecha Buscar y reemplazar texto específico en varios cuadros de texto


Puede encontrar y reemplazar el texto que necesita manualmente uno por uno, pero si hay varios cuadros de texto, esto será aburrido y cansado. Por lo tanto, el siguiente código de VBA puede ayudarlo a terminarlo de una vez.

1. Activa tu hoja de trabajo y mantén presionada ALT + F11 teclas para abrir el Ventana de Microsoft Visual Basic para Aplicaciones.

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

Código de VBA: busque y reemplace texto específico en cuadros de texto de la hoja de trabajo actual

Sub TextBoxReplace()
'Updateby20140603
Dim xWs As Worksheet
Dim shp As Shape
Dim xFindStr As String
Dim xReplace As String
xFindStr = Application.InputBox("Find:", xTitleId, "", Type:=2)
xReplace = Application.InputBox("Replace:", xTitleId, "", Type:=2)
Set xWs = Application.ActiveSheet
On Error Resume Next
For Each shp In xWs.Shapes
    xValue = shp.TextFrame.Characters.Text
    shp.TextFrame.Characters.Text = VBA.Replace(xValue, xFindStr, xReplace, 1)
Next
End Sub

3. Entonces presione F5 tecla para ejecutar este código, y se abrirá un cuadro emergente para recordarle que ingrese su texto anterior que desea reemplazar. Ver captura de pantalla:

doc-replace-text-boxes1

4. Sigue haciendo clic OKy en este cuadro de aviso, escriba el nuevo valor de texto que desea, vea la captura de pantalla:

doc-replace-text-boxes1

5. Y luego haz clic OK botón, los valores anteriores se han reemplazado por los nuevos valores que ingresó en la hoja de trabajo actual. Ver capturas de pantalla:

doc-replace-text-boxes3
-1
doc-replace-text-boxes4

Artículos relacionados:

¿Cómo encontrar y reemplazar texto en títulos de gráficos en Excel?

¿Cómo encontrar y reemplazar texto en comentarios en Excel?

¿Cómo cambiar varias rutas de hipervínculo a la vez en Excel?


  • 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
  • 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 del mouse 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.
    Jeremy · 3 months ago
    Great, thanks! This was VERY handy to adapt for my specific use.
  • To post as a guest, your comment is unpublished.
    Jeremy · 3 months ago
    Great, thanks! This was VERY handy to adapt for my specific use.
  • To post as a guest, your comment is unpublished.
    Carlos · 5 months ago
    How can I do the same in Kutool for Word
  • To post as a guest, your comment is unpublished.
    Aliya · 10 months ago
    I am still not sure how to do find and replaced, to know how to use the VBA codes needs to be more clear
  • To post as a guest, your comment is unpublished.
    Yaseen · 1 years ago
    Hello, it works great on a single sheet. I wanted to know how can I have this work for the workbook having multiple sheets. Thanks
  • To post as a guest, your comment is unpublished.
    Tomas · 1 years ago
    How can one find modifications done in text boxes of an Excel file, please? The utility "Spreadsheet Compare" shows many types of modifications between two versions of the same file but not when the changes concern text boxes. Thank you.