Memudahkan untuk mencetak beberapa sheet sekaligus hanya dengan menceklis daftar sheet yang akan dicetak kemudian mengklik tombol cetak, maka sheet-sheet terpilih akan terprint.
langsung saja kita coba buat langkah-langkah mencetak beberapa sheet dengan satu kali klik.

Langkah pertama untuk mencetak beberapa sheet secara otomatis

buka file excel yang akan kita set print beberapa sheet otomatis.untuk uji coba diusahakan file melebihi dari satu sheet. dan coba isi data pada sheet-sheet tersebut. pastikan setiap sheet mempunyai printarea yang jelas, agar bagian yang tidak diharapkan dicetak tidak tercetak.

Langkah kedua untuk mencetak beberapa sheet secara otomatis

 tekan tombol alt+f11 untuk menampilkan jendela visual basic, atau dengan memilih menu developer kemudian memilih Visual Basic. untuk menampilkan bisa dilihat di sini

Langkah ke tiga untuk mencetak beberapa sheet secara otomatis

buatlah userform dengan check box sebanyak sheet yang akan dicetak dan satu buah combobox. dalam hal ini saya memberikan contoh 3 buah sheet akan dicetak dengan satu kali klik. sehingga tampil userform 

Langkah ke empat untuk mencetak beberapa sheet secara otomatis

Pada commandbutton1 masukan script berikut dengan cara mendouble klik commandbutton1 

Private Sub CommandButton1_Click()
If CheckBox1.Value = True Then
Sheet1.PrintOut
End If
If CheckBox2.Value = True Then
Sheet2.PrintOut
End If
If CheckBox3.Value = True Then
Sheet3.PrintOut
End If

End Sub

setelah itu kita mencoba membuat tombol untuk menampilkan userform cetak beberapa sheet dengan satu kali klik yang telah kita buat, dengan cara kembali ke worksheet, kemudian klik tab developer pada bagian controls klik insert kemudian pilih button, lalu buat macro cetak dengan menuliskan kode berikut

sub cetak ()
userform1.show
end sub

nah itulah cara membuat tombol cetak beberapa sheet dengan satu kali klik, kita bisa menentukan sheet mana saja yang akan dicetak dengan menceklisnya, tetapi kalau sheet tersebut tidak akan dicetak tidak usah diceklis.