Kalau yang mau di Print --> Sheet Print.Range("B2:G5"), tambahkan saja 
perintah ini sebelum End Sub..Sheets("Print").Range("B2:G5").PrintOut

Salam,HK


    Pada Jumat, 24 Juli 2020 12.46.43 GMT+7, pragaan laoksatu 
[email protected] [belajar-excel] <[email protected]> 
menulis:  
 
     

Mantap suhu...dan saya coba berulang-ulang ..sukses...kalo sekalian terprint 
gimana suhu ?
On Thu, Jul 23, 2020 at 8:53 PM Cari Kebenaran [email protected] 
[belajar-excel] <[email protected]> wrote:

     

Coba ini Pak. 
On Thu, Jul 23, 2020 at 4:45 PM pragaan laoksatu [email protected] 
[belajar-excel] <[email protected]> wrote:

     

Bingun gak bisa bisa....mohon solosinya para suhupada gambar (1) d2 berisi 
validasi data dan D3& d4 hasil vlookupPada cell J4 berisi =Today(), ketika 
disave syan ining tanggal tsb  tersimpan di data base range (D2 : d6). Maksih 


   


   
    

Kirim email ke