Stampa selezione fogli



  • Stampa selezione fogli
    di Alesssandro (utente non iscritto) data: 23/09/2014 21:16:24

    Buonasera a tutti. Qualcuno saprebbe suggerirmi una macro che mi permetta di stampare una serie di fogli, alcuni visibili altri nascosti, i cui nomi sono contenuti nell'intervallo di celle F5:F100 di un foglio che invece è sempre scoperto? Nell'intervallo F5:F100 ci possono essere anche essere celle vuote (con valore "").
    Come avrete capito sono un novellino.Grazie



  • di Zer0Kelvin data: 24/09/2014 01:27:12

    Ciao.
    Prova così
     
    Public Sub Stampa()
    Dim Cella As Range, Visibile As XlSheetVisibility
        Application.ScreenUpdating = False
        For Each Cella In Range("F5:F100").Cells
            If Cella.Value <> "" Then
                With Sheets(Cella.Value)
                    Visibile = .Visible
                    .Visible = True
                    .PrintOut
                    .Visible = Visibile
                End With
            End If
        Next Cella
        Application.ScreenUpdating = True
    End Sub



  • di Alesssandro (utente non iscritto) data: 25/09/2014 00:26:46

    Funziona perfettamente. Grazie mille. Ciao