Thursday, July 3, 2014

MEMAKSA USER MENGAKTIFKAN MACRO



Secara bawaaan (default) Microsoft excel menonaktifkan macro untuk keamanan. Kita tidak dapat memaksa Microsoft untuk menjalankan macro saat membuka file excel yang ada macronya, demikian pula dengan penggunanya tidak dapat selalu menghidupkan macro saat membuka file. Agar file yang kita berikan selalu dihidupkan macronya saat dibuka, ikuti trik berikut ini:
Bahasa Manusia
Untuk mengawali suatu penulisan visual basic sebaiknya kita selalu mengawali dengan bahasa manusia agar lebih mudah memahami apa yang akan kita lakukan.
Agar file yang diberikan selalu dijalankan macronya kita buat trik dengan cara: selalu sheet1 yang berisi peringatan bahwa macro belum dijalankan akan terbuka apabila macro belum dijalankan, dan sheet2 yang terbuka apabila macro sudah di jalankan. Jadi user tidak dapat menggunakan file jika belum menjalankan macro tetapi hanya mendapatkan peringatan bahwa macro belum dijalankan.
Agar sheet1 terbuka saat macro belum dijalankan, saat sebelum di tututup (before close) semua sheet disembunyikan dan sheet1 saja yang nampak.
Sheet2 nampak abaila macro sudah dihidupkan, kita tulis dalam procedure Worksheet Open
Persiapan
Kita mulai dengan membuat 2 sheet yang diperlukan, sheet1  berisi peringatan agar menghidupkan macro

Sheet 2 berisi program yang akan berjalan jika macro dihidupkan.

Penulisan Macro
Bukalah VBA editor dengan menkan Alt+11.
Dobel Klik This Workbook
Pilih Object Workbook dan Prosedur Before Close:
 

 
Ketiklah kode berikut ini:
Sheet1.Visible = xlSheetVisible                  perlihatkan sheet1
Sheet2.Visible = xlSheetVeryHidden        sembunyikan sheet2
Sheet3.Visible = xlSheetVeryHidden

Pada prosedur Workbook_open tulislah kode berikut:
Sheet2.Visible = xlSheetVisible                 perlihatkan sheet2
Sheet1.Visible = xlSheetVeryHidden        sembunyikan sheet1
Sheet3.Visible = xlSheetVeryHidden

Kode selengkapnya seperti gambar di bawah ini!
Simpanlah file dalam type *.xlsm
Selamat Mencoba.

Contoh File