Fusionar 2 celdas sin perder el contenido

Hola,

He encontrado otra solución que CONCATENAR. Paso por Word.

Word, a diferencia de Excel, tiene una función que transforma la tabla en texto y viceversa.

La manipulación

Copia en Word la parte de la tabla que deseas fusionar. Selecciona la tabla y luego, en disposición, haz clic en transformar la tabla en texto. El paso de una columna a la otra se traducirá en una tabulación (por defecto) y el paso de una fila a otra por un retiro (tecla enter).

Solo tienes que eliminar los caracteres de tabulación o de retiro que desees para obtener la forma de tabla deseada. Una vez eliminados los caracteres, selecciona todo el texto creado y luego haz inserción----> tabla-----> convertir texto en tabla. Solo queda copiar y pegar en Excel.

¡Eso es!

Hola
hola Raymond

mediante una macro, podemos si las celdas contienen solo constantes (no obtenidas por fórmulas)
un ejemplo de fusión de dos celdas contiguas en la misma línea conservando el color de la fuente

Public Sub fusiona2h() Dim t1 As String, t2 As String, t As String Dim coul1 As Long, coul2 As Long Dim c As Range Application.DisplayAlerts = False With Selection If .Cells.Count <> 2 Then Exit Sub If .Rows.Count <> 1 Then Exit Sub t1 = .Cells(1, 1): coul1 = .Cells(1, 1).Font.ColorIndex t2 = .Cells(1, 2): coul2 = .Cells(1, 2).Font.ColorIndex t = t1 & " " & t2 .MergeCells = True .Value = t .Characters(1, Len(t1)).Font.ColorIndex = coul1 .Characters(Len(t1) + 2, Len(t2)).Font.ColorIndex = coul2 End With Application.DisplayAlerts = True End Sub

para poner en marcha
1. AltF11 luego insertar/módulo
2. copiar/pegar el código en el módulo 1
3. volver a la hoja
4. asignar un atajo de teclado a la macro
Herramientas/macro/macros
seleccionar fusionar2h
atajo de teclado ctrl+f (por ejemplo)
5. seleccionar las dos celdas a fusionar y luego ctrl+f

buena continuación

No puedes fusionar 2 celdas que contengan datos.
Es imprescindible que una celda esté vacía.

Para información, ya que estaba buscando la fórmula:

En el caso, por ejemplo, de una lista de apellidos compuestos, para fusionarlos hay que escribir:
=Concatenar(A1;" "&B1;" "&C1)

Esto permitirá reunir la información en una sola celda y si luego quiere hacer una copia del nuevo resultado, puede utilizar pegado especial de valores.

Esperando que esto complete el truco de la primera respuesta.