Dante Amor respondió:
H o l a: Utiliza la siguiente macro, para poner en la celda D1 la concatenación y para que la segunda línea te la ponga en negritas. Sub Concatenar() 'Por.Dante Amor Cells(1, "D") = [A1] & Chr(10) & [B1] & Chr(10) & [C1] ini = Len([A1]) + 1 fin =...