Insert
–> Shapes
–> kemudian pilih Shapes yang berbentuk kotakAssign Macro
New
Sub Cetak()
ActiveSheet.PrintOut
End Sub
Code VBA | Fungsi |
---|---|
ActiveWorkbook.PrintOut | Mencetak workbook yang aktif |
Worksheets.PrintOut | Mencetak semua Worksheet |
Sheets.PrintOut | Mencetak semua Sheet |
Sheets(“Sheet1”).PrintOut | Mencetak Sheet 1 saja |
Sheet1.PrintOut | Mencetak Sheet 1 saja |
Sheets(Array(“Sheet1”,”Sheet3”)).PrintOut | Mencetak Sheet1 dan Sheet3 (Sheet yg ada dalam Array) |
Selection.PrintOut | Mencetak Range yang di Select atau di blok |
Range (“A1:F10”).PrintOut | Mencetak data di range A1:F10 |