Como mostrar permutaciones de texto en excel

[mrocf]

Hola! bantuito
a) Haz clic con el botón derecho de tu ratón en la solapa de la hoja y selecciona: Ver código.

b) En la ventana que se te abrirá, copia y pega el siguiente código:

Código PHP:

  Sub ComoSeaQueSeLlame()
Dim ii As Long, jj As Long
Application.ScreenUpdating = False
[d2:e65536].Delete xlShiftUp
For ii = 1 To [a65536].End(xlUp).Row
  For jj = 1 To [b65536].End(xlUp).Row
    [d65536].End(xlUp).Offset(1) = Cells(ii, "a")
    [d65536].End(xlUp).Offset(, 1) = Cells(jj, "b")
  Next jj
Next ii
Application.ScreenUpdating = True
End Sub  
   

c) Cierra todas las ventanas del ambiente Visual Basic for Application en el que te encuentras y retorna al Excel

d) Crea un botón para ejecutar la macro recién incorporada: ComoSeaQueSeLlame


Al ejecutar la macro se te formarán en las columnas "D" y "E" las combinaciones que estás pidiendo.
Sólo debes tener en cuenta que los datos (a1, a2, b1, b2, etc.) deben estar ubicados desde la fila "1".

Saludos Cacho.