Saltar al contenido principal

¿Cómo agregar texto en medio de las celdas seleccionadas en Excel?

Supongamos que tiene una lista de datos compuesta con una letra inicial G y otros números, y ahora desea agregar otra letra D después de la primera letra G a toda la lista. Vea la captura de pantalla que se muestra a continuación.

¿Cómo puedes hacer para lograrlo? Porque agregar la letra a las celdas una por una parece una pérdida de tiempo durante su trabajo. En este artículo, le mostraremos cómo agregar texto en medio de las celdas seleccionadas en Excel con métodos eficientes.

Agregar texto en medio de las celdas seleccionadas con fórmula
Agregue texto en medio de las celdas seleccionadas con código VBA
Agregue texto en medio de las celdas seleccionadas con Kutools para Excel


Agregar texto en medio de las celdas seleccionadas con fórmula

En esta sección, le proporcionaremos la fórmula para agregar texto en medio de las celdas seleccionadas. Haz lo siguiente.

1. Este método debe realizarse con una columna de ayuda. Seleccione la celda en blanco que se encuentra junto a los datos originales, aquí selecciono la celda B2.

2. Copie y pegue la fórmula = IZQUIERDA (A2,1) & "D" & MID (A2,2,100) en la barra de fórmulas y luego presione el Participar llave. Ver captura de pantalla:

Notas:

  • 1). En la fórmula, el número 1 significa que el texto se agregará después del primer carácter de la celda.
  • 2). El número 2 y 100 indican que los caracteres del segundo al centésimo de la celda original se agregarán después del nuevo texto insertado.
  • 3). Si desea agregar texto después del segundo carácter, cambie el número 1 a 2 y 2 a 3 en la fórmula.
  • 4). Y el carácter "D" es el texto que agregará a la celda. Cámbielo según sus necesidades.

3. Seleccione la celda B2, arrastre el Controlador de relleno hacia abajo hasta la celda que desea cubrir con esta fórmula. Puede ver que el texto se agrega en el medio de las celdas en toda la lista.

Tips: Además de la fórmula anterior, también puede aplicar esta fórmula = REEMPLAZAR (A2,2,0, "D"), (el número 2 indica la ubicación donde desea insertar el texto, y la letra D se refiere al texto que necesita agregar, puede cambiarlos según sus necesidades), luego presione la tecla Enter para obtener el resultado.


Agregue texto al principio o al final de todas las celdas seleccionadas en Excel:

Kutools para Excel Añadir texto La utilidad puede agregar rápidamente texto especificado al principio o al final de las celdas en una selección en Excel.
¡Descargue la función completa de prueba gratuita de 30 días de Kutools para Excel ahora!


Agregue texto en medio de las celdas seleccionadas con código VBA

Además, puede agregar texto en medio de las celdas seleccionadas con código VBA.

1. Por favor presione otro + F11 para abrir el Aplicaciones de Microsoft Visual Basic ventana.

2. Hacer clic en recuadro > Módulo. Luego copie y pegue el código VBA debajo en el editor de código.

Código VBA: agregue texto a una lista de datos después del primer carácter

Sub AddString()
	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
		Rng.Value = VBA.Left(Rng.Value, 1) & "D" & VBA.Mid(Rng.Value, 2, VBA.Len(Rng.Value) - 1)
	Next
End Sub

3. Prensa F5 clave para ejecutar el código, y en la ventana emergente KutoolsparaExcel cuadro de diálogo, seleccione el rango al que desea agregar texto y finalmente haga clic en el OK del botón.

Ahora el texto especificado se agrega después del primer carácter de las celdas seleccionadas.

Note: En el código anterior, insertará un valor específico después del primer carácter dentro de la celda, puede cambiar el número 1 y 2 al número 2 y 3 si agrega el texto después del segundo carácter en este script VBA.Left (Rng.Value, 1) & "D" & VBA.Mid (Rng.Value, 2, VBA.Len (Rng.Value) - 1)y la letra D es el nuevo texto que desea insertar.


Agregue texto en medio de las celdas seleccionadas con Kutools para Excel

Tenemos que admitir que los dos métodos anteriores son inconvenientes para nosotros. Aquí te mostraré el Añadir texto utilidad de Kutools for Excel, con esta utilidad, puede especificar fácilmente la posición intermedia de la lista y luego agregar el texto determinado a esa posición de toda la lista al mismo tiempo.

Antes de aplicar Kutools for Excel, Por favor descargarlo e instalarlo en primer lugar.

1. Seleccione la lista a la que desea agregar texto en el medio de las celdas y luego haga clic en Kutools > Texto > Añadir texto. Ver captura de pantalla:

2. En el Añadir texto cuadro de diálogo, ingrese el texto que desea agregar a las celdas en el Texto cuadro, especifique la posición donde desea agregar el texto marcando la casilla Especificar opción (aquí ingreso el número 1), luego hago clic en la OK botón. (Puede obtener una vista previa instantánea del resultado agregado en el cuadro de la derecha)

Note: Para agregar texto en varias posiciones de la celda seleccionada a la vez, puede especificar las posiciones separándolas con comas en el Especificar caja. Ver captura de pantalla:

Ahora el texto especificado se agrega después de la primera letra en la lista seleccionada.

  Si desea tener una prueba gratuita (30 días) de esta utilidad, haga clic para descargarloy luego vaya a aplicar la operación según los pasos anteriores.


Agregue texto en medio de las celdas seleccionadas con Kutools para Excel


Artículo relacionado:.

Las mejores herramientas de productividad de oficina

🤖 Asistente de IA de Kutools: Revolucionar el análisis de datos basado en: Ejecución inteligente   |  Generar codigo  |  Crear fórmulas personalizadas  |  Analizar datos y generar gráficos  |  Invocar funciones de Kutools...
Características populares: Buscar, resaltar o identificar duplicados   |  Eliminar filas en blanco   |  Combine columnas o celdas sin perder datos   |   Ronda sin fórmula ...
Super búsqueda: Búsqueda virtual de criterios múltiples    Búsqueda V de valores múltiples  |   VLookup en varias hojas   |   Búsqueda difusa ....
Lista desplegable avanzada: Crear rápidamente una lista desplegable   |  Lista desplegable dependiente   |  Lista desplegable de selección múltiple ....
Administrador de columnas: Agregar un número específico de columnas  |  Mover columnas  |  Toggle Estado de visibilidad de columnas ocultas  |  Comparar rangos y columnas ...
Características destacadas: Enfoque de cuadrícula   |  Vista de diseño   |   Gran barra de fórmulas    Administrador de hojas y libros de trabajo   |  Biblioteca de Recursos (Texto automático)   |  Selector de fechas   |  Combinar hojas de trabajo   |  Cifrar/descifrar celdas    Enviar correos electrónicos por lista   |  Súper filtro   |   Filtro especial (filtro negrita/cursiva/tachado...) ...
Los 15 mejores conjuntos de herramientas12 Texto Herramientas (Añadir texto, Quitar caracteres, ...)   |   50+ Tabla Tipos (Diagrama de Gantt, ...)   |   40+ Práctico Fórmulas (Calcular la edad según el cumpleaños, ...)   |   19 Inserción Herramientas (Insertar código QR, Insertar imagen desde la ruta, ...)   |   12 Conversión Herramientas (Números a palabras, Conversión de Moneda, ...)   |   7 Fusionar y dividir Herramientas (Filas combinadas avanzadas, Células partidas, ...)   |   ... y más

Mejore sus habilidades de Excel con Kutools for Excel y experimente la eficiencia como nunca antes. Kutools for Excel ofrece más de 300 funciones avanzadas para aumentar la productividad y ahorrar tiempo.  Haga clic aquí para obtener la función que más necesita...

Descripción


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

  • Habilite la edición y lectura con pestañas en Word, Excel, PowerPoint, Publisher, Access, Visio y Project.
  • Abra y cree varios documentos en nuevas pestañas de la misma ventana, en lugar de en nuevas ventanas.
  • ¡Aumenta su productividad en un 50% y reduce cientos de clics del mouse todos los días!
Comments (7)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Boa tarde, tudo bem ?

Eu testei as duas fórmulas e não funcionaram. Inclusive testei também no mesmo cenário descrito no texto e também não funcionou. Poderia verificar se falta algo na fórmula do excel ?
This comment was minimized by the moderator on the site
Tive o mesmo problema, mas segui pela resposta que enviaram aqui, a formula para o excel em português seria =ESQUERDA(A2;1) & "D" & EXT.TEXTO(A2;2;100)

A parte da fórmula que dá o erro seria o "MID" que precisa ser substituído por "EXT.TEXTO"
This comment was minimized by the moderator on the site
Hi Matheus C.,
If you are using the Excel version in a different language than English, please convert the formula from English to the language you are currently using.
You can translate the formula in this page: https://de.excel-translator.de/translator/
This comment was minimized by the moderator on the site
Hi Vick,
The formula provided in the post can only be applied in English system environment Excel. If you have Excel in a different language than English, please convert the formula from English to the language you are currently using.
It seems that you are using the Excel in Portuguese language system. You need to change the commas in the formula to semicolons.
You can translate the formula in this page: https://de.excel-translator.de/translator/
This comment was minimized by the moderator on the site
TRIMAKASIH KAK, SANGAT MEMBANTUUUU
This comment was minimized by the moderator on the site
This seems complicated. For the originally stated problem why not just do a search for G and replace all with GD?
This comment was minimized by the moderator on the site
Because you might want to insert a specific character at a certain index of the string. What if they weren't all G's? This was just to provide an example of how it works.
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations