Ayuda con celdas

Estimado amigo.
Al combinar 2 o más celdas que poseen un contenido ella me envía un mensaje y me deja solo el contenido de la primera celda (superior izquierda).
Buscando en la ayuda no presenta ninguna posibilidad.
La hay sin tener que perder la información o ponerla en otras celdas y empezar a copiar y pegar por pedazos.
Gracias.

3 Respuestas

Respuesta
1
Efectivamente, no hay ninguna otra solución (que lleve el excel integrada), pero puedes usar las macros para hacer lo que tu quieras.
Por ejemplo, se me ha ocurrido hacerte estas 2 macros para que cojas alguna si te interesa, y sino, puedes pedirme exactamente que es lo que necesitas.
Sub combinar1()
Dim datos As String
Dim fila As Long
Dim columna As Long
datos = ""
fila = -1
columna = -1
For Each cell In Selection.Cells
If fila <> -1 Then
If cell.Row <> fila Then
datos = datos & Chr(10)
ElseIf cell.Column <> columna Then
datos = datos & " "
End If
End If
datos = datos & cell.Text
fila = cell.Row
columna = cell.Column
Next cell
Selection.ClearContents
Selection.Merge
ActiveCell.Value = datos
End Sub
Sub combinar2()
Dim datos As String
For Each cell In Selection.Cells
datos = datos & cell.Text
Next cell
Selection.ClearContents
Selection.Merge
ActiveCell.Value = datos
End Sub
Pruébalas y veras la diferencia...
Para que funcionen solo hay una restricción: tienes que tener las celdas seleccionadas antes de ejecutar la macro y empezando a seleccionar por la superior izquierda.
Si no sabes como ejecutar las macros o tienes cualquier otra duda, ya sabes...
Respuesta
Lamento decir que no tienes chances. Al combinar celdas, MS Excel sólo puede mostrar el contenido de una de ellas que siempre es la primera de la izquierda. Cualquier contenido en otra/s celdas será eliminado durante el proceso. No mates al mensajero, es sólo que MS Excel funciona así...
Sin embargo, te propongo una alternativa de solución:
Personalmente, copiaría el rango original -completo- a otra parte de la hoja y en su ubicación original colocaría una referencia a las celdas donde están ahora. (Un modo sencillo de hacerlo es copiar el nuevo rango con los datos originales, y usar la opción "Pegar Vínculo" del menú "Edición" | "Pegado Especial...", en el lugar donde quieres combinar las celdas).
De esta manera tendrás todas las celdas a combinar referenciadas a un rango externo.
Al combinarlas, recibirás nuevamente el mensaje y las fórmulas que no estén en la primer celda superior izquierda serán eliminadas. Sin embargo, conservarás los datos originales en otra parte de tu hoja.
Es mi modesto aporte apara evitar que tengas que copiar y pegar pedazos.
Respuesta
Por supuesto que hay posibilidades. Puedes fijarte en la ayuda, para conocer las funciones: hallar, encontrar, izquierda, derecha, etc., sintetizando las funciones de texto.
Por ejemplo, pensá en una celda A1 que contiene el string:
"la casa"
Podemos hacer:
B1=encontrar(" ", A1)
Nos duelve 3, que indica que el texto buscado (en nuestro caso el espacio) se ubica en la tercer posición del string.
Luego:
=izquierda(A1,B1-1)
Nos devuelve "La"
=derecha(A1, largo(A1)-B1)
Nos devuelve:
"casa"
Y así sucesivamente, puedes encadenar, más de estas funciones.

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas