Print checked worksheets with sheets own print macro

[nigelog]

The attached workbook is section of a monitoring system for maintenance faults. There are 4 different types of worksheet associated to the specific type of machine. When a fault is listed the control sheet displays a conditionally formatted "red" to alert the user.

At present when the individual worksheet is viewed a button macro will print the correct worksheet required.

I would like to try to do this from the control sheet via checkboxes. This is so that when a number of vehicles are ready to enter the garage, a list can be used to "check" the worksheet required and print them all without having to open each worksheet.

The macro would then be required to uncheck those sheets printed.

Any help pointing me in the right direction would be appreciated. I can find material on printing multiple worksheets from a checklist, but not where the sheet has a specific print macro

[nigelog]

I have been looking at a simpler way of looking at this and the attached amended worksheet shows where I think it may be possible to do this

on the control sheet scroll down and I have created a (yet to be) named range controled by the checkboxes in the GUI above

if a macro were to search the range and look for all instances of "true" can it be directed to envoke the macro listed next to it for the specific sheet

any advice as to wether this is the way to go would be greatly appreciated

rgds Nigel

[nigelog]

I have linked the checkboxes on the "control sheet" to a cell on the individual worksheet "H2", which will register true or false.

The button command for that particular worksheet is next to it, but I have entered a description in cell "H1"

Any ideas on a "for every sheet" macro that if "h2 = True" it will call the button macro for that sheet

I could add a print selected sheets macro for each subsection but it would be preferable to have one command overall


edit: Getting close with this but having problems with compile error for For without Next (not sure where to put the End Ifs)

Please Login or Register  to view this content.

any help appreciated rgds nigelog

[nigelog]

will I have to copy and rename the macro's because they are called _Click()

I still need the button on the worksheet to activate a copy of the macro

????



Edit That didn't work either


Macro so far in module 5 of attached workbook

Please Login or Register  to view this content.

[nigelog]

Bump - no response

I am not getting anywhere with this looping through the workbook - am I overlooking something very basic

Any help appreciated