Hai Nurani,
Coba begini :
1. unprotect seluruh sheet (manual atau pakai VBA)
2. buat sebuah prosedur yang tugasnya memprotect sheet tertentu dengan opsi
userinterfaceonly bernilai true
3. setelah baris proteksi tersebut (nomor 2) diikuti dengan membuka ijin
penggunaan outlining
4. jalankan prosedur ini saat workbook terbuka atau ketika akan membuka
sheet tersebut.
Contoh :
1. ada sheet bernama 'data' yang belum diproteksi (kalau sudah terproteksi,
di unprotect dulu), yang berisi outlining
2 dan 3. buat sebuah prosedur misal bernama ProteksiAwal dan diisi proses
proteksi disertai pemberian ijin akses outlining
public sub proteksiawal()
sheets("data").protect "passwordnya",userinterfaceonly:=true
sheets("data").enableoutlining=true
end sub
4. jalankan prosedur ProteksiAwal dari prosedur yang dibutuhkan
> misal saat workbook dibuka : di event open milik workbook diberi perintah
memanggil prosedur tersebut
private sub workbook_open()
proteksiawal
end sub
> atau saat worksheet data di-activate
private sub worksheet_activate()
proteksiawal
end sub
Kenapa kok dibuatian prosedur tersendiri dan tidak ditulis langsung di
setiap event yang butuh ?
> supaya bisa dipakai oleh banyak prosedur yang butuh dan mudah diedit
suatu saat alias editnya hanya di 1 prosedur saja
Peringatan !!!
1. pengaturan proteksi beserta ijin outline harus diberikan sejak workbook
dibuka
2. user tidak boleh *mengubah password proteksi* (kalau sekedar melepas
proteksi tanpa memroteksi ulang dengan password yang berbeda atau
memproteksi tanpa password malah ndak apa-apa) secara manual lalu save
workbook, karena akan mengganggu kerja prosedur proteksiawal ketika
workbook dibuka kembali setelah ditutup.
Andai batasan dalam peringatan di atas tidak mungkin terjadi dalam kasus
Anda, maka penggunaan cara diatas (pemberian ijin outlining dalam sheet
terproteksi) bisa digunakan.
Wassalam,
Kid
2015-05-24 12:09 GMT+10:00 [email protected] [belajar-excel] <
[email protected]>:
>
>
> MR.... I wanna ask again
>
> jika program sebelumnya saya protect worksheet, tapi tanpa memprotect
> group n ugroup (terlampirpada gambr1 dan 2). sehingga minimize n maximize
> cell dapat dilakukan walau dalam keadaan protect sheet.
> pegecualian tesebut bagaimana pengkodeannya terimaka kasih
>
>
> ---In [email protected], <alkenanurani@...> wrote :
>
> Thanks Mr. Toby Kenzo
>
> Ide nya sangat bagus. Mr.Toby kalo tanpa protect sheet bisa tidak?
> hanya cell2 tertentu yang diprotect. (protect cell B10:G385 dari proses
> pengeditan)
> tanpa lock dan unlock command button
>
> thanks mr tobby
> mohon bantuannya
>
>
>
>
