Automated printing
 

I have workbook with ten tabs, I would like to link check boxes on the first
page to printing. Is it possible to set a macro linked to a button to look at
the check boxes, then only print tabs for which the check boxes relate to.

Automated printing
 

Sheets("Cover").Select
Application.Dialogs(xlDialogPrint).Show
'Sheets("Cover").PrintOut Copies:=1
Sheets("Frame").Select
If Range("L51") 0 Then
ActiveWindow.SelectedSheets.PrintOut Copies:=1
End If
Sheets("Truss").Select
If Range("H18") 0 Then
ActiveWindow.SelectedSheets.PrintOut Copies:=1
Sheets("Truss Materials").Select
ActiveWindow.SelectedSheets.PrintOut Copies:=1
End If
this is part of a mcro i recorded and modified to print only te tabs i have
used and so need to print out
Hope it helps
--
paul

remove nospam for email addy!



"Newbeetle" wrote:

I have workbook with ten tabs, I would like to link check boxes on the first
page to printing. Is it possible to set a macro linked to a button to look at
the check boxes, then only print tabs for which the check boxes relate to.

Automated printing
 

Thank you its perfect

"paul" wrote:

Sheets("Cover").Select
Application.Dialogs(xlDialogPrint).Show
'Sheets("Cover").PrintOut Copies:=1
Sheets("Frame").Select
If Range("L51") 0 Then
ActiveWindow.SelectedSheets.PrintOut Copies:=1
End If
Sheets("Truss").Select
If Range("H18") 0 Then
ActiveWindow.SelectedSheets.PrintOut Copies:=1
Sheets("Truss Materials").Select
ActiveWindow.SelectedSheets.PrintOut Copies:=1
End If
this is part of a mcro i recorded and modified to print only te tabs i have
used and so need to print out
Hope it helps
--
paul

remove nospam for email addy!



"Newbeetle" wrote:

I have workbook with ten tabs, I would like to link check boxes on the first
page to printing. Is it possible to set a macro linked to a button to look at
the check boxes, then only print tabs for which the check boxes relate to.