7 Messages
Digest #4183
Messages
Fri May 12, 2017 9:19 pm (PDT) . Posted by:
"nangagus"
Coba belajar di coretan Mr. Kid dari sini
<http://excel-mr-kid.blogspot.co.id/2015/11/data-validation-list-1-pengantar.html>
dua tingkat di sini
<http://excel-mr-kid.blogspot.co.id/2015/11/data-validation-list-2-dua-tingkat.html>
banyak tingkat di sini
<http://excel-mr-kid.blogspot.co.id/2015/11/data-validation-list-3-banyak-tingkat.html>
setiap tingkat ada contoh file yang dapat diunduh pada sub File(S)
ada juga Video pembelajarannya Lho!
selamat belajar semoga sukses.
NangAgus
On 12/05/17 14.39, 2ntcf7eaz6tssojiizxiyrje4ewbxn3nhfwoa3cb@yahoo.com
[belajar-excel] wrote:
>
> saya sudah download dan saya buka file nya tetapi muncul error
>
>
> Microsoft Visual basic for applications
>
> Compile error :
>
> The code in this project must be updated for use on64-bits systems.
> please review and update declare statements and then mark them with
> the Ptrsafe attribute
>
> ada solusi selain menggunakan VBA karena saya masih belum mengerti
> untuk formula nya
>
>
<http://excel-mr-kid.blogspot.co.id/2015/11/data-validation-list-1-pengantar.html>
dua tingkat di sini
<http://excel-mr-kid.blogspot.co.id/2015/11/data-validation-list-2-dua-tingkat.html>
banyak tingkat di sini
<http://excel-mr-kid.blogspot.co.id/2015/11/data-validation-list-3-banyak-tingkat.html>
setiap tingkat ada contoh file yang dapat diunduh pada sub File(S)
ada juga Video pembelajarannya Lho!
selamat belajar semoga sukses.
NangAgus
On 12/05/17 14.39, 2ntcf7eaz6tssojiizxiyrje4ewbxn3nhfwoa3cb@yahoo.com
[belajar-excel] wrote:
>
> saya sudah download dan saya buka file nya tetapi muncul error
>
>
> Microsoft Visual basic for applications
>
> Compile error :
>
> The code in this project must be updated for use on64-bits systems.
> please review and update declare statements and then mark them with
> the Ptrsafe attribute
>
> ada solusi selain menggunakan VBA karena saya masih belum mengerti
> untuk formula nya
>
>
Sat May 13, 2017 12:02 am (PDT) . Posted by:
"farud oke"
Mohon bimbingannya para master..
Saya ingin mengunci semua sheet yg berisi formula dengan vba,untuk hal ini
bisa dilakukan.yg saya tanyakan bagaimana agar gambar/foto yg berada dalam
sheet yg dikunci itu bisa terkunci juga sehingga tidak bisa dihapus ataupun
di ubah.lebih jelasnya file terlampir
Atas bantuannya saya ucapkan terima kasih
Saya ingin mengunci semua sheet yg berisi formula dengan vba,untuk hal ini
bisa dilakukan.yg saya tanyakan bagaimana agar gambar/foto yg berada dalam
sheet yg dikunci itu bisa terkunci juga sehingga tidak bisa dihapus ataupun
di ubah.lebih jelasnya file terlampir
Atas bantuannya saya ucapkan terima kasih
Sat May 13, 2017 4:05 am (PDT) . Posted by:
"Mr. Kid" nmkid.family@ymail.com
Hai Farud,
Buat si sheet selalu terkunci. Secara default, shapes telah memiliki nilai
opsi Locked adalah TRUE (tercentang), sehingga saat sheet ter-protect, maka
shapes tidak dapat diubah oleh user.
Regards,
Kid
2017-05-13 13:31 GMT+07:00 farud oke farud.oke@gmail.com [belajar-excel] <
belajar-excel@yahoogroups.com>:
>
>
> Mohon bimbingannya para master..
> Saya ingin mengunci semua sheet yg berisi formula dengan vba,untuk hal ini
> bisa dilakukan.yg saya tanyakan bagaimana agar gambar/foto yg berada dalam
> sheet yg dikunci itu bisa terkunci juga sehingga tidak bisa dihapus ataupun
> di ubah.lebih jelasnya file terlampir
> Atas bantuannya saya ucapkan terima kasih
>
>
>
Buat si sheet selalu terkunci. Secara default, shapes telah memiliki nilai
opsi Locked adalah TRUE (tercentang), sehingga saat sheet ter-protect, maka
shapes tidak dapat diubah oleh user.
Regards,
Kid
2017-05-13 13:31 GMT+07:00 farud oke farud.oke@gmail.com [belajar-excel] <
belajar-excel@yahoogroups.com>:
>
>
> Mohon bimbingannya para master..
> Saya ingin mengunci semua sheet yg berisi formula dengan vba,untuk hal ini
> bisa dilakukan.yg saya tanyakan bagaimana agar gambar/foto yg berada dalam
> sheet yg dikunci itu bisa terkunci juga sehingga tidak bisa dihapus ataupun
> di ubah.lebih jelasnya file terlampir
> Atas bantuannya saya ucapkan terima kasih
>
>
>
Sat May 13, 2017 6:51 am (PDT) . Posted by:
"farud oke"
Terus terang apa yg disampaikan sama mr.kid saya tidak paham,kalau bisa
jelaskan secara step by step mr..maklum bru satu tahun ini bljar excel jadi
masih banyak yg harus dipelajari..sebelumnya saya ucapkan terimakasih
Pada tanggal 13 Mei 2017 6.05 PM, "'Mr. Kid' mr.nmkid@gmail.com
[belajar-excel]" <belajar-excel@yahoogroups.com> menulis:
>
>
> Hai Farud,
>
> Buat si sheet selalu terkunci. Secara default, shapes telah memiliki nilai
> opsi Locked adalah TRUE (tercentang), sehingga saat sheet ter-protect, maka
> shapes tidak dapat diubah oleh user.
>
>
> Regards,
> Kid
>
>
> 2017-05-13 13:31 GMT+07:00 farud oke farud.oke@gmail.com [belajar-excel] <
> belajar-excel@yahoogroups.com>:
>
>>
>>
>> Mohon bimbingannya para master..
>> Saya ingin mengunci semua sheet yg berisi formula dengan vba,untuk hal
>> ini bisa dilakukan.yg saya tanyakan bagaimana agar gambar/foto yg berada
>> dalam sheet yg dikunci itu bisa terkunci juga sehingga tidak bisa dihapus
>> ataupun di ubah.lebih jelasnya file terlampir
>> Atas bantuannya saya ucapkan terima kasih
>>
>>
>
>
jelaskan secara step by step mr..maklum bru satu tahun ini bljar excel jadi
masih banyak yg harus dipelajari..sebelumnya saya ucapkan terimakasih
Pada tanggal 13 Mei 2017 6.05 PM, "'Mr. Kid' mr.nmkid@gmail.com
[belajar-excel]" <belajar-excel@yahoogroups.com> menulis:
>
>
> Hai Farud,
>
> Buat si sheet selalu terkunci. Secara default, shapes telah memiliki nilai
> opsi Locked adalah TRUE (tercentang), sehingga saat sheet ter-protect, maka
> shapes tidak dapat diubah oleh user.
>
>
> Regards,
> Kid
>
>
> 2017-05-13 13:31 GMT+07:00 farud oke farud.oke@gmail.com [belajar-excel] <
> belajar-excel@yahoogroups.com>:
>
>>
>>
>> Mohon bimbingannya para master..
>> Saya ingin mengunci semua sheet yg berisi formula dengan vba,untuk hal
>> ini bisa dilakukan.yg saya tanyakan bagaimana agar gambar/foto yg berada
>> dalam sheet yg dikunci itu bisa terkunci juga sehingga tidak bisa dihapus
>> ataupun di ubah.lebih jelasnya file terlampir
>> Atas bantuannya saya ucapkan terima kasih
>>
>>
>
>
Sat May 13, 2017 7:17 am (PDT) . Posted by:
"Mr. Kid" nmkid.family@ymail.com
Begini.
1. Buat workbook baru.
2. Insert picture -> pilih file jpg yang Anda miliki apa saja yang ada di
komputer Anda -> klik sebuah cells.
3. Protect sheet lewat ribbon Review -> Protect Sheet -> gak usah
dipassword -> tekan OK
Dah selesai.
Shape tidak bisa diubah-ubah.
Kenapa ? Karena defaultnya, shapes itu dalam kondisi di-locked.
Gimana supaya gak bisa diubah-ubah ?
- Jaga sheet supaya ter-protect alias JANGAN pernah unprotect sheet.
Done.
Regards,
Kid
2017-05-13 20:47 GMT+07:00 farud oke farud.oke@gmail.com [belajar-excel] <
belajar-excel@yahoogroups.com>:
>
>
> Terus terang apa yg disampaikan sama mr.kid saya tidak paham,kalau bisa
> jelaskan secara step by step mr..maklum bru satu tahun ini bljar excel jadi
> masih banyak yg harus dipelajari..sebelumnya saya ucapkan terimakasih
>
> Pada tanggal 13 Mei 2017 6.05 PM, "'Mr. Kid' mr.nmkid@gmail.com
> [belajar-excel]" <belajar-excel@yahoogroups.com> menulis:
>
>>
>>
>> Hai Farud,
>>
>> Buat si sheet selalu terkunci. Secara default, shapes telah memiliki
>> nilai opsi Locked adalah TRUE (tercentang), sehingga saat sheet
>> ter-protect, maka shapes tidak dapat diubah oleh user.
>>
>>
>> Regards,
>> Kid
>>
>>
>> 2017-05-13 13:31 GMT+07:00 farud oke farud.oke@gmail.com [belajar-excel]
>> <belajar-excel@yahoogroups.com>:
>>
>>>
>>>
>>> Mohon bimbingannya para master..
>>> Saya ingin mengunci semua sheet yg berisi formula dengan vba,untuk hal
>>> ini bisa dilakukan.yg saya tanyakan bagaimana agar gambar/foto yg berada
>>> dalam sheet yg dikunci itu bisa terkunci juga sehingga tidak bisa dihapus
>>> ataupun di ubah.lebih jelasnya file terlampir
>>> Atas bantuannya saya ucapkan terima kasih
>>>
>>>
>>
>
1. Buat workbook baru.
2. Insert picture -> pilih file jpg yang Anda miliki apa saja yang ada di
komputer Anda -> klik sebuah cells.
3. Protect sheet lewat ribbon Review -> Protect Sheet -> gak usah
dipassword -> tekan OK
Dah selesai.
Shape tidak bisa diubah-ubah.
Kenapa ? Karena defaultnya, shapes itu dalam kondisi di-locked.
Gimana supaya gak bisa diubah-ubah ?
- Jaga sheet supaya ter-protect alias JANGAN pernah unprotect sheet.
Done.
Regards,
Kid
2017-05-13 20:47 GMT+07:00 farud oke farud.oke@gmail.com [belajar-excel] <
belajar-excel@yahoogroups.com>:
>
>
> Terus terang apa yg disampaikan sama mr.kid saya tidak paham,kalau bisa
> jelaskan secara step by step mr..maklum bru satu tahun ini bljar excel jadi
> masih banyak yg harus dipelajari..sebelumnya saya ucapkan terimakasih
>
> Pada tanggal 13 Mei 2017 6.05 PM, "'Mr. Kid' mr.nmkid@gmail.com
> [belajar-excel]" <belajar-excel@yahoogroups.com> menulis:
>
>>
>>
>> Hai Farud,
>>
>> Buat si sheet selalu terkunci. Secara default, shapes telah memiliki
>> nilai opsi Locked adalah TRUE (tercentang), sehingga saat sheet
>> ter-protect, maka shapes tidak dapat diubah oleh user.
>>
>>
>> Regards,
>> Kid
>>
>>
>> 2017-05-13 13:31 GMT+07:00 farud oke farud.oke@gmail.com [belajar-excel]
>> <belajar-excel@yahoogroups.com>:
>>
>>>
>>>
>>> Mohon bimbingannya para master..
>>> Saya ingin mengunci semua sheet yg berisi formula dengan vba,untuk hal
>>> ini bisa dilakukan.yg saya tanyakan bagaimana agar gambar/foto yg berada
>>> dalam sheet yg dikunci itu bisa terkunci juga sehingga tidak bisa dihapus
>>> ataupun di ubah.lebih jelasnya file terlampir
>>> Atas bantuannya saya ucapkan terima kasih
>>>
>>>
>>
>
Sat May 13, 2017 4:29 pm (PDT) . Posted by:
"farud oke"
Klo seperti itu yg mr.kid maksud dari awal sudah saya lakukan,tapi ketika
dimasukkan formula seperti ini di workbook
Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target
As Range)
Dim A As Range
For Each A In Target.Cells
If A.HasFormula Then
ActiveSheet.Protect "rahasia"
Exit Sub
Else
ActiveSheet.Unprotect " rahasia"
End If
Next A
End Sub
Ketika sheet yg sdh terkunci tadi di klik salah satu cell saja maka
otomatis akan membuka penguncian yg dilakukan dari review tadi.
Yg saya inginkan itu mengunci semua sheet yg berisi formula dan sheet yg
berisi gambar,dan untuk gambarnya juga tidak bisa di edit/dihapus.karena
klo menggunakan formula diatas untuk gambar masih bisa diubah ketika klik
salah satu cell saja
Pada tanggal 13 Mei 2017 9.17 PM, "'Mr. Kid' mr.nmkid@gmail.com
[belajar-excel]" <belajar-excel@yahoogroups.com> menulis:
Begini.
1. Buat workbook baru.
2. Insert picture -> pilih file jpg yang Anda miliki apa saja yang ada di
komputer Anda -> klik sebuah cells.
3. Protect sheet lewat ribbon Review -> Protect Sheet -> gak usah
dipassword -> tekan OK
Dah selesai.
Shape tidak bisa diubah-ubah.
Kenapa ? Karena defaultnya, shapes itu dalam kondisi di-locked.
Gimana supaya gak bisa diubah-ubah ?
- Jaga sheet supaya ter-protect alias JANGAN pernah unprotect sheet.
Done.
Regards,
Kid
2017-05-13 20:47 GMT+07:00 farud oke farud.oke@gmail.com [belajar-excel] <
belajar-excel@yahoogroups.com>:
>
>
> Terus terang apa yg disampaikan sama mr.kid saya tidak paham,kalau bisa
> jelaskan secara step by step mr..maklum bru satu tahun ini bljar excel jadi
> masih banyak yg harus dipelajari..sebelumnya saya ucapkan terimakasih
>
> Pada tanggal 13 Mei 2017 6.05 PM, "'Mr. Kid' mr.nmkid@gmail.com
> [belajar-excel]" <belajar-excel@yahoogroups.com> menulis:
>
>>
>>
>> Hai Farud,
>>
>> Buat si sheet selalu terkunci. Secara default, shapes telah memiliki
>> nilai opsi Locked adalah TRUE (tercentang), sehingga saat sheet
>> ter-protect, maka shapes tidak dapat diubah oleh user.
>>
>>
>> Regards,
>> Kid
>>
>>
>> 2017-05-13 13:31 GMT+07:00 farud oke farud.oke@gmail.com [belajar-excel]
>> <belajar-excel@yahoogroups.com>:
>>
>>>
>>>
>>> Mohon bimbingannya para master..
>>> Saya ingin mengunci semua sheet yg berisi formula dengan vba,untuk hal
>>> ini bisa dilakukan.yg saya tanyakan bagaimana agar gambar/foto yg berada
>>> dalam sheet yg dikunci itu bisa terkunci juga sehingga tidak bisa dihapus
>>> ataupun di ubah.lebih jelasnya file terlampir
>>> Atas bantuannya saya ucapkan terima kasih
>>>
>>>
>>
dimasukkan formula seperti ini di workbook
Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target
As Range)
Dim A As Range
For Each A In Target.Cells
If A.HasFormula Then
ActiveSheet.Protect "rahasia"
Exit Sub
Else
ActiveSheet.Unprotect " rahasia"
End If
Next A
End Sub
Ketika sheet yg sdh terkunci tadi di klik salah satu cell saja maka
otomatis akan membuka penguncian yg dilakukan dari review tadi.
Yg saya inginkan itu mengunci semua sheet yg berisi formula dan sheet yg
berisi gambar,dan untuk gambarnya juga tidak bisa di edit/dihapus.karena
klo menggunakan formula diatas untuk gambar masih bisa diubah ketika klik
salah satu cell saja
Pada tanggal 13 Mei 2017 9.17 PM, "'Mr. Kid' mr.nmkid@gmail.com
[belajar-excel]" <belajar-excel@yahoogroups.com> menulis:
Begini.
1. Buat workbook baru.
2. Insert picture -> pilih file jpg yang Anda miliki apa saja yang ada di
komputer Anda -> klik sebuah cells.
3. Protect sheet lewat ribbon Review -> Protect Sheet -> gak usah
dipassword -> tekan OK
Dah selesai.
Shape tidak bisa diubah-ubah.
Kenapa ? Karena defaultnya, shapes itu dalam kondisi di-locked.
Gimana supaya gak bisa diubah-ubah ?
- Jaga sheet supaya ter-protect alias JANGAN pernah unprotect sheet.
Done.
Regards,
Kid
2017-05-13 20:47 GMT+07:00 farud oke farud.oke@gmail.com [belajar-excel] <
belajar-excel@yahoogroups.com>:
>
>
> Terus terang apa yg disampaikan sama mr.kid saya tidak paham,kalau bisa
> jelaskan secara step by step mr..maklum bru satu tahun ini bljar excel jadi
> masih banyak yg harus dipelajari..sebelumnya saya ucapkan terimakasih
>
> Pada tanggal 13 Mei 2017 6.05 PM, "'Mr. Kid' mr.nmkid@gmail.com
> [belajar-excel]" <belajar-excel@yahoogroups.com> menulis:
>
>>
>>
>> Hai Farud,
>>
>> Buat si sheet selalu terkunci. Secara default, shapes telah memiliki
>> nilai opsi Locked adalah TRUE (tercentang), sehingga saat sheet
>> ter-protect, maka shapes tidak dapat diubah oleh user.
>>
>>
>> Regards,
>> Kid
>>
>>
>> 2017-05-13 13:31 GMT+07:00 farud oke farud.oke@gmail.com [belajar-excel]
>> <belajar-excel@yahoogroups.com>:
>>
>>>
>>>
>>> Mohon bimbingannya para master..
>>> Saya ingin mengunci semua sheet yg berisi formula dengan vba,untuk hal
>>> ini bisa dilakukan.yg saya tanyakan bagaimana agar gambar/foto yg berada
>>> dalam sheet yg dikunci itu bisa terkunci juga sehingga tidak bisa dihapus
>>> ataupun di ubah.lebih jelasnya file terlampir
>>> Atas bantuannya saya ucapkan terima kasih
>>>
>>>
>>
Sat May 13, 2017 5:51 pm (PDT) . Posted by:
"Mr. Kid" nmkid.family@ymail.com
Hai Farud,
Pada email lalu itu adalah prinsip dasarnya, yaitu : Jika ingin membatasi
user, JANGAN PERNAH buka proteksi worksheet ketika user bisa melakukan
segala sesuatu.
Jadi, script Anda tidak mengikuti prinsip dasar tersebut. Semua isi
prosedur itu dihapus saja (itu juga kalau Anda mau, wakakaka, no offense).
Ada baiknya, sebelum berpusing ria mencari bunyi kode VBA-nya, pahami dulu
proses manual yang mungkin dilakukan tanpa VBA.
Contoh :
1. Buat workbook baru
2. Pada sebuah worksheet, isi dengan hal berikut :
Kolom A :
Tulis di A1 : Waktu saat ini
Tulis di A2 : Bulan
Tulis di A3 : Nama
Tulis di A4 : Kota
blok A1:A2 -> klik kanan yang diblok -> format cells -> tab Protection ->
opsi Hidden : diCENTANG -> tekan OK
Kolom B :
Tulis formula di B1 : =Now()
Tulis formula di B2 : =Text( B1 , "mmmm" )
klik kanan B2 -> pilih format cells -> tab Protection -> opsi Hidden :
diCENTANG -> tekan OK
klik kanan B3 -> pilih format cells -> tab Protection -> opsi Locked :
HILANGKAN CENTANG -> tekan OK
klik kanan B4 -> pilih format cells -> tab Protection -> opsi Locked :
HILANGKAN CENTANG -> opsi Hidden : diCENTANG -> tekan OK
3. Protect worksheet dengan cara :
ribbon Review -> group Changes -> klik Protect Worksheet -> GAK USAH
dipassword
-> CENTANG opsi select locked cells dan select unlocked cells -> tekan OK
4. Isi cells B3 dengan Kid
5. Isi cells B4 dengan Jakarta
6. gerakkan tombol panah di keyboard untuk pindah ke cells lain -> lihat
isi formula box.
7. Sila kirim ke milis apa perbedaan dari setiap cells tersebut (kalau mau
berbagi).
Kalau sudah mencobanya, Insya Allah bisa paham manfaatnya.
Lalu silakan lakukan proses 1 sampai 7 tersebut pada sheet lain, tetapi
didahului dengan proses record macro agar bisa mendapatkan baris kode
VBA-nya.
Sorry ya BeExceller semuanya,
kalau cuma dikasih baris kode jadinya doang, dikuatirkan tidak akan terjadi
proses aktif mencari tahu apa saja yang bisa didapat dari hal yang
dilakukan oleh baris kode tersebut.
Buktinya :
> Sudah tahu baris kode untuk protect sheet dengan bunyi :
Sheets("nama sheet yang mau di-protect").Protect "bunyi passowrd"
> Tapi tidak tampak ada gelagat mencoba apa guna opsi-opsi saat akan
protect worksheet secara manual dan bagaimana bunyi baris kode untuk
mengatur setiap opsi tersebut.
> Alasannya sederhana, karena tidak tahu dan belum butuh.
hmmm....
Untung masih ada member yang butuh berbagi apa yang sudah dipahaminya.
Kalau semuanya seperti itu, bagaimana nanti kalau ada kasus yang belum
diketahui semua member milis ya...
hehehe...
Alangkah indahnya
jika respon member terhadap suatu kasus menjadi titik awal untuk
mengeksplorasi lebih banyak terkait respon tersebut.
Jadi, kita bisa berkembang bersama dan saling berbagi.
Regards,
Kid
2017-05-14 4:45 GMT+07:00 farud oke farud.oke@gmail.com [belajar-excel] <
belajar-excel@yahoogroups.com>:
>
>
> Klo seperti itu yg mr.kid maksud dari awal sudah saya lakukan,tapi ketika
> dimasukkan formula seperti ini di workbook
> Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal
> Target As Range)
> Dim A As Range
> For Each A In Target.Cells
> If A.HasFormula Then
> ActiveSheet.Protect "rahasia"
> Exit Sub
> Else
> ActiveSheet.Unprotect " rahasia"
> End If
> Next A
> End Sub
>
> Ketika sheet yg sdh terkunci tadi di klik salah satu cell saja maka
> otomatis akan membuka penguncian yg dilakukan dari review tadi.
> Yg saya inginkan itu mengunci semua sheet yg berisi formula dan sheet yg
> berisi gambar,dan untuk gambarnya juga tidak bisa di edit/dihapus.karena
> klo menggunakan formula diatas untuk gambar masih bisa diubah ketika klik
> salah satu cell saja
>
> Pada tanggal 13 Mei 2017 9.17 PM, "'Mr. Kid' mr.nmkid@gmail.com
> [belajar-excel]" <belajar-excel@yahoogroups.com> menulis:
>
>
>
> Begini.
> 1. Buat workbook baru.
> 2. Insert picture -> pilih file jpg yang Anda miliki apa saja yang ada di
> komputer Anda -> klik sebuah cells.
> 3. Protect sheet lewat ribbon Review -> Protect Sheet -> gak usah
> dipassword -> tekan OK
>
> Dah selesai.
> Shape tidak bisa diubah-ubah.
> Kenapa ? Karena defaultnya, shapes itu dalam kondisi di-locked.
>
> Gimana supaya gak bisa diubah-ubah ?
> - Jaga sheet supaya ter-protect alias JANGAN pernah unprotect sheet.
>
> Done.
>
> Regards,
> Kid
>
>
>
>
>
>
> 2017-05-13 20:47 GMT+07:00 farud oke farud.oke@gmail.com [belajar-excel] <
> belajar-excel@yahoogroups.com>:
>
>>
>>
>> Terus terang apa yg disampaikan sama mr.kid saya tidak paham,kalau bisa
>> jelaskan secara step by step mr..maklum bru satu tahun ini bljar excel jadi
>> masih banyak yg harus dipelajari..sebelumnya saya ucapkan terimakasih
>>
>> Pada tanggal 13 Mei 2017 6.05 PM, "'Mr. Kid' mr.nmkid@gmail.com
>> [belajar-excel]" <belajar-excel@yahoogroups.com> menulis:
>>
>>>
>>>
>>> Hai Farud,
>>>
>>> Buat si sheet selalu terkunci. Secara default, shapes telah memiliki
>>> nilai opsi Locked adalah TRUE (tercentang), sehingga saat sheet
>>> ter-protect, maka shapes tidak dapat diubah oleh user.
>>>
>>>
>>> Regards,
>>> Kid
>>>
>>>
>>> 2017-05-13 13:31 GMT+07:00 farud oke farud.oke@gmail.com
>>> [belajar-excel] <belajar-excel@yahoogroups.com>:
>>>
>>>>
>>>>
>>>> Mohon bimbingannya para master..
>>>> Saya ingin mengunci semua sheet yg berisi formula dengan vba,untuk hal
>>>> ini bisa dilakukan.yg saya tanyakan bagaimana agar gambar/foto yg berada
>>>> dalam sheet yg dikunci itu bisa terkunci juga sehingga tidak bisa dihapus
>>>> ataupun di ubah.lebih jelasnya file terlampir
>>>> Atas bantuannya saya ucapkan terima kasih
>>>>
>>>>
>>>
>
>
>
Pada email lalu itu adalah prinsip dasarnya, yaitu : Jika ingin membatasi
user, JANGAN PERNAH buka proteksi worksheet ketika user bisa melakukan
segala sesuatu.
Jadi, script Anda tidak mengikuti prinsip dasar tersebut. Semua isi
prosedur itu dihapus saja (itu juga kalau Anda mau, wakakaka, no offense).
Ada baiknya, sebelum berpusing ria mencari bunyi kode VBA-nya, pahami dulu
proses manual yang mungkin dilakukan tanpa VBA.
Contoh :
1. Buat workbook baru
2. Pada sebuah worksheet, isi dengan hal berikut :
Kolom A :
Tulis di A1 : Waktu saat ini
Tulis di A2 : Bulan
Tulis di A3 : Nama
Tulis di A4 : Kota
blok A1:A2 -> klik kanan yang diblok -> format cells -> tab Protection ->
opsi Hidden : diCENTANG -> tekan OK
Kolom B :
Tulis formula di B1 : =Now()
Tulis formula di B2 : =Text( B1 , "mmmm" )
klik kanan B2 -> pilih format cells -> tab Protection -> opsi Hidden :
diCENTANG -> tekan OK
klik kanan B3 -> pilih format cells -> tab Protection -> opsi Locked :
HILANGKAN CENTANG -> tekan OK
klik kanan B4 -> pilih format cells -> tab Protection -> opsi Locked :
HILANGKAN CENTANG -> opsi Hidden : diCENTANG -> tekan OK
3. Protect worksheet dengan cara :
ribbon Review -> group Changes -> klik Protect Worksheet -> GAK USAH
dipassword
-> CENTANG opsi select locked cells dan select unlocked cells -> tekan OK
4. Isi cells B3 dengan Kid
5. Isi cells B4 dengan Jakarta
6. gerakkan tombol panah di keyboard untuk pindah ke cells lain -> lihat
isi formula box.
7. Sila kirim ke milis apa perbedaan dari setiap cells tersebut (kalau mau
berbagi).
Kalau sudah mencobanya, Insya Allah bisa paham manfaatnya.
Lalu silakan lakukan proses 1 sampai 7 tersebut pada sheet lain, tetapi
didahului dengan proses record macro agar bisa mendapatkan baris kode
VBA-nya.
Sorry ya BeExceller semuanya,
kalau cuma dikasih baris kode jadinya doang, dikuatirkan tidak akan terjadi
proses aktif mencari tahu apa saja yang bisa didapat dari hal yang
dilakukan oleh baris kode tersebut.
Buktinya :
> Sudah tahu baris kode untuk protect sheet dengan bunyi :
Sheets("nama sheet yang mau di-protect").Protect "bunyi passowrd"
> Tapi tidak tampak ada gelagat mencoba apa guna opsi-opsi saat akan
protect worksheet secara manual dan bagaimana bunyi baris kode untuk
mengatur setiap opsi tersebut.
> Alasannya sederhana, karena tidak tahu dan belum butuh.
hmmm....
Untung masih ada member yang butuh berbagi apa yang sudah dipahaminya.
Kalau semuanya seperti itu, bagaimana nanti kalau ada kasus yang belum
diketahui semua member milis ya...
hehehe...
Alangkah indahnya
jika respon member terhadap suatu kasus menjadi titik awal untuk
mengeksplorasi lebih banyak terkait respon tersebut.
Jadi, kita bisa berkembang bersama dan saling berbagi.
Regards,
Kid
2017-05-14 4:45 GMT+07:00 farud oke farud.oke@gmail.com [belajar-excel] <
belajar-excel@yahoogroups.com>:
>
>
> Klo seperti itu yg mr.kid maksud dari awal sudah saya lakukan,tapi ketika
> dimasukkan formula seperti ini di workbook
> Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal
> Target As Range)
> Dim A As Range
> For Each A In Target.Cells
> If A.HasFormula Then
> ActiveSheet.Protect "rahasia"
> Exit Sub
> Else
> ActiveSheet.Unprotect " rahasia"
> End If
> Next A
> End Sub
>
> Ketika sheet yg sdh terkunci tadi di klik salah satu cell saja maka
> otomatis akan membuka penguncian yg dilakukan dari review tadi.
> Yg saya inginkan itu mengunci semua sheet yg berisi formula dan sheet yg
> berisi gambar,dan untuk gambarnya juga tidak bisa di edit/dihapus.karena
> klo menggunakan formula diatas untuk gambar masih bisa diubah ketika klik
> salah satu cell saja
>
> Pada tanggal 13 Mei 2017 9.17 PM, "'Mr. Kid' mr.nmkid@gmail.com
> [belajar-excel]" <belajar-excel@yahoogroups.com> menulis:
>
>
>
> Begini.
> 1. Buat workbook baru.
> 2. Insert picture -> pilih file jpg yang Anda miliki apa saja yang ada di
> komputer Anda -> klik sebuah cells.
> 3. Protect sheet lewat ribbon Review -> Protect Sheet -> gak usah
> dipassword -> tekan OK
>
> Dah selesai.
> Shape tidak bisa diubah-ubah.
> Kenapa ? Karena defaultnya, shapes itu dalam kondisi di-locked.
>
> Gimana supaya gak bisa diubah-ubah ?
> - Jaga sheet supaya ter-protect alias JANGAN pernah unprotect sheet.
>
> Done.
>
> Regards,
> Kid
>
>
>
>
>
>
> 2017-05-13 20:47 GMT+07:00 farud oke farud.oke@gmail.com [belajar-excel] <
> belajar-excel@yahoogroups.com>:
>
>>
>>
>> Terus terang apa yg disampaikan sama mr.kid saya tidak paham,kalau bisa
>> jelaskan secara step by step mr..maklum bru satu tahun ini bljar excel jadi
>> masih banyak yg harus dipelajari..sebelumnya saya ucapkan terimakasih
>>
>> Pada tanggal 13 Mei 2017 6.05 PM, "'Mr. Kid' mr.nmkid@gmail.com
>> [belajar-excel]" <belajar-excel@yahoogroups.com> menulis:
>>
>>>
>>>
>>> Hai Farud,
>>>
>>> Buat si sheet selalu terkunci. Secara default, shapes telah memiliki
>>> nilai opsi Locked adalah TRUE (tercentang), sehingga saat sheet
>>> ter-protect, maka shapes tidak dapat diubah oleh user.
>>>
>>>
>>> Regards,
>>> Kid
>>>
>>>
>>> 2017-05-13 13:31 GMT+07:00 farud oke farud.oke@gmail.com
>>> [belajar-excel] <belajar-excel@yahoogroups.com>:
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>
>
>
============================================================
Pojok Lowongan Kerja yang disediakan milis :
http://milis-belajar-excel.1048464.n5.nabble.com/Pojok-Lowongan-Kerja-f5725753.html
*** Posting lowongan kerja : ke link tersebut dan klik New Topic
============================================================
bergabung ke milis (subscribe), kirim mail kosong ke: belajar-excel-subscribe@yahoogroups.com
posting ke milis, kirimkan ke: belajar-excel@yahoogroups.com
berkunjung ke web milis : http://tech.groups.yahoo.com/group/belajar-excel/messages
melihat file archive / mendownload lampiran : http://www.mail-archive.com/belajar-excel@yahoogroups.com/
atau (sejak 25-Apr-2011) bisa juga di : http://milis-belajar-excel.1048464.n5.nabble.com/
menghubungi moderators & owners: belajar-excel-owner@yahoogroups.com
keluar dari membership milis (UnSubscribe), kirim mail kosong ke : belajar-excel-unsubscribe@yahoogroups.com
---------------------------------------------------------------------
Pojok Lowongan Kerja yang disediakan milis :
http://milis-belajar-excel.1048464.n5.nabble.com/Pojok-Lowongan-Kerja-f5725753.html
*** Posting lowongan kerja : ke link tersebut dan klik New Topic
============================================================
bergabung ke milis (subscribe), kirim mail kosong ke: belajar-excel-subscribe@yahoogroups.com
posting ke milis, kirimkan ke: belajar-excel@yahoogroups.com
berkunjung ke web milis : http://tech.groups.yahoo.com/group/belajar-excel/messages
melihat file archive / mendownload lampiran : http://www.mail-archive.com/belajar-excel@yahoogroups.com/
atau (sejak 25-Apr-2011) bisa juga di : http://milis-belajar-excel.1048464.n5.nabble.com/
menghubungi moderators & owners: belajar-excel-owner@yahoogroups.com
keluar dari membership milis (UnSubscribe), kirim mail kosong ke : belajar-excel-unsubscribe@yahoogroups.com
---------------------------------------------------------------------
Tidak ada komentar:
Posting Komentar