Tuesday, December 22, 2015

Cara Mencegah Rename File Macro Excel

Perhatikan gambar format gif dibawah..!!! File Excel yang di rename setelah dibuka langsung memberikan peringatan agar nama file tidak di ubah dan harus dengan nama yang ditentukan oleh programernya. Walaupun Ngak penting-penting amat sich..!!! 
Mencegah rename terhadap aplikasi VBA Excel dapat digunakan untuk melindungi validitas aplikasi yang dipesan oleh sesuatu lembaga. Misalnya, aplikasi yang kita bikin untuk Sekolah A maka nama aplikasi kita kasih embel-embel dengan menambahkan nama Sekolah A pada aplikasi sebagai identitas valid aplikasi tersebut.

Jika aplikasi digunakan oleh Sekolah B, namun aplikasi tersebut masih ada embel-embel Sekolah A, dapat dipastikan bahwa Sekolah B mendapatkan aplikasi bukan dari pihak programernya. Dengan demikian aplikasi yang digunakan tidak sah atau tidak dengan seizin programer.


Mencegah Rename File Macro Excel ini dapat juga digunakan untuk melindungi nama Aplikasi. Terkadang programer memberi nama kepada aplikasi dan menginginkan nama aplikasi tersebut tidak dirubah.

Ikuti langkah-langkah membuat file excel tidak bisa di rename. untuk percobaan ini saya  masih menggunakan file yang terdapat pada posting Tombol Simpan VBA Excel dengan tujuan agar anda bisa mengikuti dari awal pembahasan dengan demikian anda dapat membuat sebuah Aplikasi dari tahap awal secara otodidak.

Langkah-langkah Mencega Rename File Excel Macro :
  • Buka Visual Basic File Aplikasi Data yang sudah di download
  • Pada Project Explorer(Jika tidak tampil tekan Ctrl + R pada Keyboard), double klik pada tulisan "ThisWorkbook" dan akan tampil layout Code. Masukkan kode dibawah ini diantara Private Sub Workbook_Open() dan End Sub

If ThisWorkbook.Name <> "Aplikasi Data.xlsb" Then
     MsgBox "Maaf, Nama File Harus ''Aplikasi Data.xlsb, Tidak Boleh DiGanti''", 16, "Error..."
       ThisWorkbook.Save
         ThisWorkbook.Close
        Application.Quit
    Exit Sub
    End If

  • Selesai..!! Cobalah untuk merename file..!! bila anda meletakkan kode dengan benar maka file akan memberikan peringatan jika nama file di ganti.
Demikian posting Cara Mencegah Rename File Macro Excel, Semoga dapat digunakan dan diaplikasikan pada aplikasi masing-masing. Jika memiliki kode lain yang memiliki fungsi yang sama harap bisa di share di kolom komentar. 

Komentar Anda Sangat Menentukan Kelangsungan Blog ini
EmoticonEmoticon