Soluzione stampa pagine



  • Soluzione stampa pagine
    di Atis10 data: 24/02/2011

    Buongiorno, dopo avervi torturati per una giornata intera, ho trovato la soluzione che fa funzionare la macro come serve a me!

    grazie per ki si è sbattuto :) (mik)
     
    Sub stampaPagine()
    Npag = Range("a17").Value
    ActiveSheet.PrintOut From:=1, To:=Npag, Copies:=1, ActivePrinter:="Acrobat Distiller", _
    Collate:=True
    End Sub