My aim is to hide the sheet "PrintLog" and to record each instance of print to that sheet. The code I want to use is below but am having a problem with testing if the sheet has been set to print. The first line of the IF statement is my hang up. Can anyone help? Thanks.
Option Explicit Sub PrintLogAllSheets() Dim ws As Worksheet, LastRow As Long, PrintLog As Worksheet Application.ScreenUpdating = False For Each ws In ActiveWorkbook.Worksheets If ws.PrintOut = "True" Then Set PrintLog = Worksheets("PrintLog") LastRow = PrintLog.Range("A65536").End(xlUp).Row + 1 With PrintLog .Cells(LastRow, 1).Value = Now() .Cells(LastRow, 2).Value = Application.UserName .Cells(LastRow, 3).Value = ActiveSheet.Name End With Next ws Application.ScreenUpdating = True End Sub