Excel Macro print button

[Paulyw]

Hi guys, pretty new to excel and really appreciate any help/advise offered.

I have a workbook with 30 worksheets referencing off a master(worksheet) for some of there data.
I would like to tick a checkbox on the master(worksheet) push my print button and have all of the selected checkboxes print to PDF...
suggestions?

Thanks!

 

[CalcSux78]

I did the following code on a test workbook and was able to print any sheet with a marked checkbox.

Sub SelectivePrint()
Dim i As Integer
For i = 1 To Sheets.Count
    On Error Resume Next
    If Sheets(i).PrintBox = True Then Sheets(i).PrintOut
Next i
End Sub

In order for code to work, you would need an ActiveX checkbox labeled "PrintBox" on each sheet you would want to have the print option.

Once complete, you could insert a Beveled box and add the macro to it (which would trigger the macro to run on click)

 

[Jack in the UK]

Not sure if this is much help to you, worth a try. I never really got in well with Excel and PDFs they seem to scatter on save, unlike M$ Word

To save a lot of code this will run and save each sheet as a PDF, just delete what You do not want. The code will take a bit of time to run, You will see the creation bar lane moving each with thou

The files are save default local(Documents / my Documents etc

jiuk

Sub my_SaveAS_PDFs()
    Dim myWORKSHEET As Worksheet
    Dim myFILE_NAME As String
    For Each myWORKSHEET In ActiveWorkbook.Worksheets
        On Error Resume Next
       
        myFILE_NAME = ActiveWorkbook.Name & "-" & myWORKSHEET.Name
        
            myWORKSHEET.ExportAsFixedFormat _
            Type:=xlTypePDF, _
            Filename:=myFILE_NAME, _
            Quality:=xlQualityStandard, _
            IncludeDocProperties:=True, _
            IgnorePrintAreas:=False
    Next myWORKSHEET
        On Error GoTo zero
Exit Sub
End Sub