vba code for printout using check box

[rararara]

Hi,

Good Day!

i am new in using VBA, i have 5 sheets, i need to print sheet 2,3,4,5 using check box in sheet 1 and a command button "print out". hoping for your help.


POST MOVED BY MODERATOR


.

 

[PCosta87]

Hi there,

Maybe something like this:

Sub Printselected()

    Dim i As Integer
  
    For i = 2 To 5
        If Sheets("Printselection").Shapes("Check Box " & i).ControlFormat.Value = 1 Then
            Sheets("Sheet" & i).PrintOut Copies:=1
        End If
    Next i
  
End Sub

See attached file... Hope it helps

 

[rararara]

hi there i tried to input the code you have provided but there's an error message "run time error "9" subscript out of range

 

[PCosta87]

hi there i tried to input the code you have provided but there's an error message "run time error "9" subscript out of range

Hi,

That is because of the names of the sheets or the checkboxes... my approach used names on the code, which may not work if they are different.

If you wish me to change the code for your specific case, please provide a file and i will gladly take a look at it.

 

[mohadin]

Hi;
well, I think a minor modification would do the job
pls. see the attached

Regards

 

[rararara]

Hi guys.

thank you so much for helping me out here.kindly check the sample file.

 

[PCosta87]

Hi guys.

thank you so much for helping me out here.kindly check the sample file.

Hi,

Please see attached... let us know if it worked

Regards

 

[rararara]

Thank you so much guys for helping me out here.

 

[PCosta87]

You are welcome