Bagaimana cara melindungi/melindungi lembar menggunakan vba?

Di VBA ada metode PROTECT yang bisa Anda gunakan dengan sheet. Dalam metode ini, Anda memiliki opsi untuk melindungi sheet, dengan atau tanpa kata sandi. Dan Anda juga dapat melindungi suatu objek dari lembaran. Kita akan melihat semua ini secara detail di tutorial ini.

Dalam tutorial ini, kita akan melihat cara memproteksi dan membuka proteksi satu atau beberapa sheet menggunakan kode VBA.

Tulis kode VBA untuk melindungi sheet

Untuk memproteksi sheet, Anda harus menentukan sheet terlebih dahulu, lalu menggunakan metode proteksi. Berikut langkah-langkahnya.

  1. Gunakan objek lembar untuk menentukan lembar.
  2. Masukkan nama sheet yang ingin Anda lindungi.
  3. Ketikkan titik untuk mendapatkan daftar metode dan properti.
  4. Pilih metode proyek atau masukkan.
gunakan-objek-lembar-untuk-menentukan-lembar-yang akan dilindungi
 Sheets("Sheet1").Protect

Tautan yang berguna: Jalankan makroPerekam makroEditor Visual BasicBuku Pegangan Makro Pribadi

Tulis kode VBA untuk membuka proteksi sheet

Untuk memproteksi sheet, Anda harus menentukan sheet terlebih dahulu lalu menggunakan metode unprotect. Berikut langkah-langkahnya.

  1. Tentukan sheet menggunakan objek sheet.
  2. Lalu, masukkan nama sheet yang ingin Anda lindungi.
  3. Masukkan titik untuk mendapatkan daftar metode dan properti.
  4. Pilih metode “Buka proteksi” atau masukkan.
gunakan-objek-lembar-untuk-menentukan-lembar-yang tidak dilindungi
 Sheets("Sheet1").Unprotect

Lindungi sheet dengan kata sandi

Jika Anda ingin menyetel kata sandi sekaligus melindungi sheet, dalam hal ini Anda perlu menggunakan argumen kata sandi untuk menentukan kata sandi. Misalkan Anda ingin menyetel kata sandi “test123” pada lembar untuk melindunginya, kodenya akan seperti di bawah ini.

lindungi-lembar-dengan-kata sandi
 Sheets("Sheet1").Protect Password:="test123"

Buka proteksi sheet dengan kata sandi

Demikian pula, jika Anda ingin membuka proteksi sheet, Anda harus menyebutkan kata sandi dalam argumen kata sandi. Misalkan password yang Anda gunakan untuk memproteksi sheet adalah “ADSBP” maka kode untuk membuka proteksinya akan seperti di bawah ini.

 Sheets("Sheet1").Unprotect Password:="ADSBP"

Ada satu hal yang perlu diperhatikan, perhatikan huruf besar karena VBA membedakan huruf besar dan huruf kecil.

Hal lain yang perlu diketahui

Seperti yang saya katakan, kami menggunakan metode “Proteksi” VBA, dan ada argumen selain “Kata Sandi” dengan metode ini yang dapat Anda gunakan.

 expression.Protect (Password, DrawingObjects, Contents, Scenarios, UserInterfaceOnly, AllowFormattingCells, AllowFormattingColumns, AllowFormattingRows, AllowInsertingColumns, AllowInsertingRows, AllowInsertingHyperlinks, AllowDeletingColumns, AllowDeletingRows, AllowSorting, AllowFiltering, AllowUsingPivotTables)
  1. DrawingObjects : Untuk melindungi dan membuka perlindungan bentuk.
  2. Isi : UNTUK melindungi sel-sel yang terkunci dan keseluruhan grafik.
  3. Skenario : Untuk melindungi skenario di spreadsheet.
  4. UserInterfaceOnly : Untuk melindungi hanya antarmuka pengguna, bukan makro.
  5. AllowFormattingCells : untuk memungkinkan pengguna menerapkan pemformatan ke sel.
  6. AllowFormattingColumns : Untuk memungkinkan pengguna menerapkan pemformatan ke kolom.
  7. AllowFormattingRows : untuk memungkinkan pengguna menerapkan pemformatan ke baris.
  8. AllowInsertingColumns : untuk memungkinkan pengguna memasukkan kolom baru.
  9. AllowInsertingRows : Untuk mengizinkan pengguna menyisipkan baris baru.
  10. AllowInsertingHyperlinks : Untuk mengizinkan pengguna membuat hyperlink.
  11. AllowDeletingColumns : untuk mengizinkan pengguna menghapus kolom.
  12. AllowDeletingRows : untuk mengizinkan pengguna menghapus baris.
  13. Izinkan pengurutan : untuk memungkinkan pengguna mengurutkan baris, kolom, dan tabel.
  14. AllowFiltering : Untuk mengizinkan pemfilteran kolom.
  15. AllowUsingPivotTables : untuk mengizinkan pengguna menggunakan tabel pivot.

Komentar

  • Pastikan untuk menggunakan kata sandi yang kuat yang menggabungkan huruf besar dan kecil, angka, dan simbol.
  • Jika Anda lupa kata sandi, Microsoft tidak dapat memulihkannya. Jadi, pastikan Anda menuliskan kata sandi Anda di suatu tempat yang aman.
  • Jika sheet diproteksi tanpa kata sandi dan sekarang Anda ingin melindunginya dengan kata sandi, Anda harus membuka proteksinya terlebih dahulu. Dan kemudian lindungi kembali dengan kata sandi menggunakan kode yang Anda lihat di atas.

Tambahkan komentar

Alamat email Anda tidak akan dipublikasikan. Ruas yang wajib ditandai *