macro beginner


I have the following set to a command button to print. So far the macro sets
the print area perfectly the way I want it. I just need to know what is
missing after the print area is defined to actually send it to the printer

Private Sub CommandButton1_Click()
Worksheets("PDSR").Activate
Set c = Worksheets("PDSR").Columns("Y"). _
Find("0", LookIn:=xlValues)
If Not c Is Nothing Then
Worksheets("PDSR").Range(Cells(1, 1), Cells(c.Row, 12)).Select
ActiveSheet.PageSetup.PrintArea = Selection.Address
End If
End Sub