Insertar salto de linea en excel

Buscando por hay encontré esta solución y creo que se ajusta a lo que necesitas:
=celda1&CARACTER(10)&celda2&CARACTER(10)&celda3
ó sino,
=CONCATENAR(celda1;CARACTER(10);celda2;CARACTER(10);celda3)
Dónde el Carácter Ascii Número 10 es el salto de línea, luego debes formatear la celda con Ajuste de Texto desde el Menú Formato, Celdas, Ficha Alineación, Ajustar Texto; para que los "?" se conviertan en verdaderos saltos de línea.

Ok, funciona perfectamente. Lo único, que si una de las celdas está vacía, también queda vacía la linea correspondiente en la celda destino. ¿Sería posible eliminar esas lineas vacías? Es decir, que en la celda destino solo aparezcan los datos de las celdas que tienen datos.

Me parece que no hay forma de hacer a través de fórmula ; si se puede realizar a través de macros...
Si te interesa podemos realizar una...

Ok, vamos a intentarlo con macros.
A parte me ha surgido otro problemilla. Hay celdas originales que ocupan más de una linea en la celda final. Las primeras hace un ajuste automático y pasa lo que no cabe a la linea siguiente, pero a partir de una determinada, lo que no cabe en una línea lo corta. ¿Sabes por que puede ocurrir esto?
Muchas gracias

Pedrias enviarme yu archivo para verificarlo
[email protected]

Bueno acá esta la macro Función más que nada para evitar el CARÁCTER(10) :
Function Juntar(ParamArray nums() As Variant) As String
dato = nums(x)
n = UBound(nums()) ' Finds the number of arguments passed to
' the function.
For x = 1 To n
dato = dato & Chr(10) & nums(x)
Next ' Adds each of the arguments into the total sum.
Juntar = dato
End Function
en la hoja de calculo la llamarías :
=juntar(B5;C5;D5;E5;F5)
Luego formateas la celda como el anterior ejemplo
saludos

Gracias, pero me he perdido un poco.
¿Esta macro donde la pongo? Porque si luego voy a llamarla desde la celda correspondiente...¿?