Sub Cetak()
Sheets.PrintOut
End Sub