Asalamualaikum warahmatullah
Dear Farud.
Jika memprotect sheet sebaiknya menggunakan userInterfaceOnly = true,
jika dipilih ini berarti kita dapat mengubah, mengisi dan menghapus cell
yang terprotect menggunakan VBA, tetapi cell tersebut tidak dapat diubah
manual karena terprotect.
Pembacaan excel untuk cekrip anda sbb:
For Each sh In ThisWorkbook.Worksheets 'untuk setiap sheet dalam semua
sheets tolong di chek satu persatu
If sh.Name <> "awas" Then ' jika sheet yang diperiksa bernama
"awas" maka:
sh.Protect Rahasia 'sheet tersebut di kunci dengan password
yang disimpan dalam variabel Rahasia
End If 'batas akhir Jika
Next sh ' chek sheet berikutnya sampai sheet akhir
Application.ScreenUpdating = True ' dalam melaksanakan perintah saya
jangan ditampakkan di layar yaa!
Selamat belajar semoga sukses, (saya sudah belajar menggunakan excel 20
tahun ternyata tetap masih belum mahir menggunakan excel)
On 09/05/17 15.47, farud oke [email protected] [belajar-excel] wrote:
Terimakasih mas agus atas jawabannya..
Sudah sesuai dg harapan mas..
Oiya mas..satu lagi,trus terang kode vba saya itu hasil googling sana
sini dimana ketika membuka file otomatis file itu terkunci sendiri
mas.agar tidak serta merta otomatis mengunci bagian mana dari kode vba
itu yg hrus ditambah atau dihapus mas..
Atas bimbingannya saya sampaikan terimakasih
------------------------------------------------------------------------
Posted by: farud oke <[email protected]>
------------------------------------------------------------------------
Reply via web post
<https://groups.yahoo.com/neo/groups/belajar-excel/conversations/messages/42137;_ylc=X3oDMTJyZW40ZHY4BF9TAzk3MzU5NzE0BGdycElkAzIwNjI3Njc4BGdycHNwSWQDMTcwODI5ODgyMQRtc2dJZAM0MjEzNwRzZWMDZnRyBHNsawNycGx5BHN0aW1lAzE0OTQzMjA0ODk-?act=reply&messageNum=42137>
• Reply to sender
<mailto:[email protected]?subject=Re%3A%20%5Bbelajar-excel%5D%20Link%20ribbon%20tak%20berfungsi>
• Reply to group
<mailto:[email protected]?subject=Re%3A%20%5Bbelajar-excel%5D%20Link%20ribbon%20tak%20berfungsi>
• Start a New Topic
<https://groups.yahoo.com/neo/groups/belajar-excel/conversations/newtopic;_ylc=X3oDMTJmbWhxOXUyBF9TAzk3MzU5NzE0BGdycElkAzIwNjI3Njc4BGdycHNwSWQDMTcwODI5ODgyMQRzZWMDZnRyBHNsawNudHBjBHN0aW1lAzE0OTQzMjA0ODk->
• Messages in this topic
<https://groups.yahoo.com/neo/groups/belajar-excel/conversations/topics/42133;_ylc=X3oDMTM3cDFvajllBF9TAzk3MzU5NzE0BGdycElkAzIwNjI3Njc4BGdycHNwSWQDMTcwODI5ODgyMQRtc2dJZAM0MjEzNwRzZWMDZnRyBHNsawN2dHBjBHN0aW1lAzE0OTQzMjA0ODkEdHBjSWQDNDIxMzM->
(3)
------------------------------------------------------------------------
Have you tried the highest rated email app? <https://yho.com/1wwmgg>
With 4.5 stars in iTunes, the Yahoo Mail app is the highest rated
email app on the market. What are you waiting for? Now you can access
all your inboxes (Gmail, Outlook, AOL and more) in one place. Never
delete an email again with 1000GB of free cloud storage.
------------------------------------------------------------------------
============================================================
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:
[email protected]
posting ke milis, kirimkan ke: [email protected]
berkunjung ke web milis :
http://tech.groups.yahoo.com/group/belajar-excel/messages
melihat file archive / mendownload lampiran :
http://www.mail-archive.com/[email protected]/
atau (sejak 25-Apr-2011) bisa juga di :
http://milis-belajar-excel.1048464.n5.nabble.com/
menghubungi moderators & owners: [email protected]
keluar dari membership milis (UnSubscribe), kirim mail kosong ke :
[email protected]
---------------------------------------------------------------------
Visit Your Group
<https://groups.yahoo.com/neo/groups/belajar-excel/info;_ylc=X3oDMTJmN2tsc2JhBF9TAzk3MzU5NzE0BGdycElkAzIwNjI3Njc4BGdycHNwSWQDMTcwODI5ODgyMQRzZWMDdnRsBHNsawN2Z2hwBHN0aW1lAzE0OTQzMjA0ODk->
* New Members
<https://groups.yahoo.com/neo/groups/belajar-excel/members/all;_ylc=X3oDMTJnMGdpcTRmBF9TAzk3MzU5NzE0BGdycElkAzIwNjI3Njc4BGdycHNwSWQDMTcwODI5ODgyMQRzZWMDdnRsBHNsawN2bWJycwRzdGltZQMxNDk0MzIwNDg5>
7
Yahoo! Groups
<https://groups.yahoo.com/neo;_ylc=X3oDMTJlNTNvYjVjBF9TAzk3NDc2NTkwBGdycElkAzIwNjI3Njc4BGdycHNwSWQDMTcwODI5ODgyMQRzZWMDZnRyBHNsawNnZnAEc3RpbWUDMTQ5NDMyMDQ4OQ-->
• Privacy
<https://info.yahoo.com/privacy/us/yahoo/groups/details.html> •
Unsubscribe
<mailto:[email protected]?subject=Unsubscribe>
• Terms of Use <https://info.yahoo.com/legal/us/yahoo/utos/terms/>
.
