Copie fila o filas segun condición en columna y se imprima

[ElmerFigueroa]

Que tal amigos de Ayuda Excel tengo un archivo y requiero de su ayuda en lo siguiente:

- Paso 1 En la Hoja Base a partir de la columna "A6" los ordene de la A la Z y seleccione el primer registro lo copie en la Hoja reporte, en la columna "C1" ponga el nombre del cliente y se imprima la hoja, que el proceso se repita hasta que seleccione todos los registros.

- Paso 2 En la Hoja Base a partir de la columna "A6" los ordene de la A la Z para que seleccione todos los clientes que coincidan con la misma inicial y los copie en la Hoja reporte, en la columna "C1" ponga el nombre del cliente y se imprima la hoja, que el proceso se repita hasta que seleccione a todos los clientes.

Bueno esta esto es lo que necesito realícela Macro y antes que nada gracias!

Productos.zip

[LeandroA]

Estas pidiendo presupuesto para que alguien lo haga por ti?, o quieres aprender a hacerlo?

[ElmerFigueroa]

Ya tengo resuelto el PASO 1 y les comparto la solución, solo me falta el PASO 2

Sub Paso1()


    Range("A6").Select


        Do Until IsEmpty(ActiveCell)


        Selection.EntireRow.Select

        Selection.Copy


        Sheets("Reporte").Select

        Range("a6").PasteSpecial xlPasteAll

        Application.CutCopyMode = False


        'ActiveSheet.PrintOut Copies:=1


         Sheets("Base").Select


         ' Bajar 1 fila de la ubicación actual.

         ActiveCell.Offset(1, 0).Select

      Loop

    MsgBox "Las impresiones estan listas!"

End Sub[/CODE]