Monday, May 16, 2016

Tips - Membatasi Scroll Area (dengan sedikit Macro)

Masih soal membatasi akses user nih :) 

Hal ini untuk "menyelamatkan" data yang kita sudah buat tentunya supaya aman.

Tips kali ini menunjukan gimana caranya untuk membatasi scroll area / sejauh mana kursor bisa bergerak dalam sebuah Sheet dengan cara menuliskan "sedikit" perintah Macro. Sedikit aja kok.. 

Di contoh kali ini, penulis menggunakan "Sheet1" dan Area nya adalah A1 sampai dengan H9 sebagai batasan nya.

Berikut langkah nya :

  1. Pilih Sheet nya
  2. Klik kanan pada sheet tersebut
  3. Pada menu yang muncul, pilih "View Code"
  4. Setelah muncul VB Editor, di jendela kanan atas ada 2 tombol dropdown / Combobox.
  5. Pada combobox yang kiri, pilih Worksheet
  6. Pada combobox yang kanan, secara default akan muncul tulisan SelectionChange. Klik tombol tersebut dan pilih Activate
  7. Yang muncul adalah prosedur Private Sub Worksheet Activate() - kita bahas ini pada bahasan soal Macro ya ?
  8. Diantara prosedur itu, tuliskan Me.Scrollarea = "A1:H9"
  9. Save file - dan coba untuk buka sheet lain dulu, baru buka sheet tadi supaya Macro nya aktif.
Gampang kan ? 

Apabila ada rumus atau data diluar A1:H9, tetap aman.

Untuk mengembalikan ke keadaan semula atau tanpa batasan scroll area, tinggal hapus macro pada point ke 8.

Selamat mencoba ;)

Tested on Microsoft Excel 2010.


2 comments:

  1. kenapa ketika kita close program excelnya, dan terus kita buka lagi file tersebut, akan kembali seperti semula?tidak ada efek scroll areanya?!

    ReplyDelete
    Replies
    1. Selamat sore. Sudah coba pastikan bahwa yang aktif / Terpilih adalah Sheet1 ? dalam file contoh, Macro nya diletakan di Sheet1 soal nya :D

      Delete