¿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
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...
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!