Export Excel Sheet ke PDF dengan VBA Excel Macro

Pernahkan anda membuat Ratusan / Ribuan File PDF dari Excel, dan di export secara manual satu-persatu ? sungguh menjengkelkan bukan ?

Nah di artikel ini saya mencoba untuk sharing bagaimana mengotomasi hal tersebut dengan VBA Macro agar mempermudah pekerjaan kita.

Langkah-langkahnya :

1. download Microsoft Office Add-in: Microsoft Save as PDF or XPS di sini , lalu install file yg telah anda download tadi. 
2. Buka File Excel yang ingin anda  Convert ke PDF.
3. Masuk ke Pilihan Developper :
   
4. Buat Tombol Export dengan mengklik insert Form Control :
   
5. 
6. Masuk ke Source Mode (Alt + F11)
7. Ketikkan Script Berikut ini :

   
   Sub cetaktopdf()
       ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
           "D:\PDF\hasilnya.pdf", Quality:=xlQualityStandard, _
           IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:= _
           False
       DoEvents
       MsgBox "Convert To PDF Done"
   End Sub
   
   

Jika ada banyak dokumen yang ingin di cetak tinggal melakukan perulangan pada Script di atas.

Selamat Mencoba !