Dante Amor respondió:

En la hoja "autos" pon tu información de esta forma: Ejecuta la siguiente macro: Sub Combinar() 'Por.Dante Amor Set h1 = Sheets("autos") Set h2 = Sheets("combinaciones") ' h2.Rows("2:" & Rows.Count).ClearContents Set r1 = h1.Range("A2:A" &...