excel-print-out-hidden-worksheets

Excel - Print Out Hidden Worksheets

This macro prints out hidden worksheets of a workbook.

Excel

  • 978
  • 474
  • 0
  • 0
Add to collection
© 2021VBAmacros.net

1 Open MS Excel.

2 Create a blank workbook.


3 Go to Developer's tab > click on "Visual Basic" button or hit Alt + F11.


4 Go to Insert tab > click on "Module" or hit M.


5 Copy the VBA code from below.

6 Paste the code in the newly created module.


7 Go to Run tab > click on "Run Sub/UserForm" or hit F5.


8 That's it!


Advertisement

Code
'==========================================
' Print Out Hidden Worksheets
'==========================================
Sub printOutHiddenWorksheets()
    ' Set variables
    Dim ws As Worksheet
    ' Loop thru worksheets
    For Each ws In ThisWorkbook.Worksheets
        ' Use worksheet
        With ws
            ' Check if worksheet is visible
            If .Visible = xlSheetHidden Or _
                .Visible = xlSheetVeryHidden Then
                ' Set worksheet to be visible and print it
                If .Visible = xlSheetHidden Then
                    .Visible = xlSheetVisible
                    .PrintPreview
                    .Visible = xlSheetHidden
                End If
                ' Set worksheet to be visible and print it
                If .Visible = xlSheetVeryHidden Then
                    .Visible = xlSheetVisible
                    .PrintPreview
                    .Visible = xlSheetVeryHidden
                End If
            End If
        End With
    Next
End Sub
Advertisement


Comments
Sort by:
This site is protected by reCAPTCHA and the Google Privacy Policy and Terms of Service apply.
VBAmacros.net VBAmacros.net
Code was successfully copied!
VBAmacros.net VBAmacros.net
Please sign in!
VBAmacros.net VBAmacros.net
You've already voted!