Dante Amor respondió:
Te anexo la macro actualizada. Cada que la ejecutes, primero te limpiará la columna destino Sub unir_columnas() 'Por.Dante Amor Application.ScreenUpdating = False ci = Columns("C").Column 'columna inicial a unir cf = Columns("O").Column 'columna...