Been working with OP who is getting an error message 'PrintOut method of
worksheet class failed'. He has three checkboxes and two buttons on a dialog
box (forerunner of UserForm). The controls are from the Forms toolbar. He
has the checkboxes linked to cells A1, A2 and A3 respectively on Sheet 2. He
has this code tied to the command button, not as a click event, but as a run
command.

Sub PRNT()
Dim c As Range
With Sheets("Sheet2")
For Each c In .Range("A1:A3")
If c.Address = "$A$1" And c = "True" Then
Sheets("Sheet1").PrintOut
ElseIf c.Address = "$A$2" And c = "True" Then
Sheets("Sheet2").PrintOut
ElseIf c.Address = "$A$3" And c = "True" Then
Sheets("Sheet3").PrintOut
End If
Next
End With
MsgBox "Sheets for all checked boxes have printed"
End Sub

The code works on my xl2003 system with a similar setup on a userform, so I
am stumped. Does anyone know of any peculiarities of the old xl5.0 software
that would cause this glitch?