Note: The other languages of the website are Google-translated. Back to English

Bagaimana cara mencegah penghapusan baris atau kolom dalam buku kerja bersama yang tidak dilindungi?

Saat Anda membagikan buku kerja kepada orang lain, bagaimana Anda bisa mencegah orang lain menghapus kolom atau baris buku kerja bersama Anda tanpa melindungi buku kerja? Di sini saya menemukan kode VBA yang dapat mencegah orang lain menghapus kolom dan baris di buku kerja bersama.

Mencegah penghapusan baris atau kolom di buku kerja bersama dengan VBA

Tab Office Mengaktifkan Pengeditan dan Penjelajahan Tab di Office, dan Jadikan Pekerjaan Anda Lebih Mudah ...
Kutools for Excel Memecahkan Sebagian Besar Masalah Anda, dan Meningkatkan Produktivitas Anda hingga 80%
  • Gunakan Kembali Apa Pun: Tambahkan rumus, bagan, dan hal lain yang paling sering digunakan atau rumit ke favorit Anda, dan gunakan kembali dengan cepat di masa mendatang.
  • Lebih dari 20 fitur teks: Ekstrak Nomor dari String Teks; Ekstrak atau Hapus Bagian dari Teks; Ubah Angka dan Mata Uang ke Kata Bahasa Inggris.
  • Gabungkan Alat: Beberapa Buku Kerja dan Lembar menjadi Satu; Gabungkan Beberapa Sel / Baris / Kolom Tanpa Kehilangan Data; Gabungkan Baris dan Jumlah Duplikat.
  • Alat Pisah: Membagi Data Menjadi Beberapa Lembar Berdasarkan Nilai; Satu Buku Kerja ke Beberapa File Excel, PDF atau CSV; Satu Kolom ke Beberapa Kolom.
  • Tempel Melewati Baris Tersembunyi / Difilter; Hitung Dan Jumlah dengan Warna Latar Belakang; Kirim Email Hasil Personalisasi ke Beberapa Penerima secara Massal.
  • Filter Super: Buat skema filter tingkat lanjut dan terapkan ke setiap lembar; Jenis menurut minggu, hari, frekuensi, dan lainnya; SARING dengan tebal, rumus, komentar ...
  • Lebih dari 300 fitur canggih; Bekerja dengan Office 2007-2021 dan 365; Mendukung semua bahasa; Penerapan yang mudah di perusahaan atau organisasi Anda.

panah gelembung kanan biru Mencegah penghapusan baris atau kolom di buku kerja bersama dengan VBA

1. tekan Alt + F11 untuk membuka a Microsoft Visual Basic untuk Aplikasi jendela.

2. klik Menyisipkan > Modul untuk membuka jendela Modul, lalu salin VBA berikut ke jendela tersebut.

VBA: Mencegah penghapusan baris atau kolom.

Sub StopDeleteRowCols()
'Updateby20221221
Dim xBarControl As CommandBarControl
Application.OnKey "^{-}", ""
For Each xBarControl In Application.CommandBars.FindControls(ID:=293)
    xBarControl.Enabled = False
Next
For Each xBarControl In Application.CommandBars.FindControls(ID:=294)
    xBarControl.Enabled = False
Next
End Sub

3. klik Run tombol atau F5 tombol pada keyboard untuk menjalankan kode ini.

Kemudian ketika orang lain mengklik kanan untuk menghapus kolom atau baris yang dipilih, opsi Hapus tidak dapat diterapkan di menu konteks. Lihat tangkapan layar:

doc-nonaktifkan-hapus-baris-kolom-1

Juga, itu mencegah pengguna untuk menggunakan pintasan Ctrl + - tombol untuk menghapus baris atau kolom.

Catatan:

(1) Jika Anda telah membagikan buku kerja Anda dengan ULASAN > Bagikan Buku Kerja, Anda tidak dapat lagi menambahkan makro VBA. Oleh karena itu, Anda sebaiknya menambahkan VBA sebelum membagikan buku kerja.

(2) VBA ini akan menonaktifkan Delete di menu konteks di semua buku kerja saat Anda mengklik kanan kolom atau baris yang dipilih.

(3) Untuk memulihkan file Delete di menu konteks, harap ganti keduanya Salah dengan Benar di VBA di atas, dan jalankan VBA lagi.


Alat Produktivitas Kantor Terbaik

Kutools for Excel Memecahkan Sebagian Besar Masalah Anda, dan Meningkatkan Produktivitas Anda hingga 80%

  • Reuse: Masukkan dengan cepat rumus, bagan yang kompleks dan apa pun yang pernah Anda gunakan sebelumnya; Enkripsi Sel dengan kata sandi; Buat Milis dan mengirim email ...
  • Bilah Formula Super (dengan mudah mengedit beberapa baris teks dan rumus); Membaca Tata Letak (membaca dan mengedit sel dalam jumlah besar dengan mudah); Tempel ke Rentang yang Difilter...
  • Gabungkan Sel / Baris / Kolom tanpa kehilangan Data; Pisahkan Konten Sel; Gabungkan Baris / Kolom Duplikat... Mencegah Sel Duplikat; Bandingkan Rentang...
  • Pilih Duplikat atau Unik Baris; Pilih Baris Kosong (semua sel kosong); Temukan Super dan Temukan Fuzzy di Banyak Buku Kerja; Pilih Acak ...
  • Salinan Tepat Beberapa Sel tanpa mengubah referensi rumus; Buat Referensi Otomatis ke Beberapa Lembar; Sisipkan Poin, Kotak Centang, dan lainnya ...
  • Ekstrak Teks, Tambahkan Teks, Hapus berdasarkan Posisi, Hapus Space; Membuat dan Mencetak Subtotal Paging; Konversi Konten Antar Sel dan Komentar...
  • Filter Super (simpan dan terapkan skema filter ke sheet lain); Penyortiran Lanjutan menurut bulan / minggu / hari, frekuensi dan lainnya; Filter Khusus dengan huruf tebal, miring ...
  • Gabungkan Workbooks dan WorkSheets; Gabungkan Tabel berdasarkan kolom kunci; Pisahkan Data menjadi Beberapa Lembar; Konversi Batch xls, xlsx dan PDF...
  • Lebih dari 300 fitur canggih. Mendukung Office / Excel 2007-2021 dan 365. Mendukung semua bahasa. Penerapan yang mudah di perusahaan atau organisasi Anda. Fitur lengkap Uji coba gratis 30 hari. Jaminan uang kembali 60 hari.
tab kte 201905

Tab Office Membawa antarmuka Tab ke Office, dan Membuat Pekerjaan Anda Jauh Lebih Mudah

  • Aktifkan pengeditan dan pembacaan tab di Word, Excel, PowerPoint, Publisher, Access, Visio, dan Project.
  • Buka dan buat banyak dokumen di tab baru di jendela yang sama, bukan di jendela baru.
  • Meningkatkan produktivitas Anda sebesar 50%, dan mengurangi ratusan klik mouse untuk Anda setiap hari!
officetab bawah
Urutkan komentar berdasarkan
komentar (7)
Belum ada peringkat. Jadilah yang pertama memberi peringkat!
Komentar ini diminimalkan oleh moderator di situs
Bisakah Anda membagikan kode vba untuk menonaktifkan opsi Potong, Sisipkan, dan Hapus di pita Beranda??? Namun saya tahu kode vba untuk menonaktifkannya melalui klik kanan dan keyboard. Tetapi di sini saya memerlukan kode untuk menonaktifkan opsi potong, masukkan, dan hapus di pita beranda excel.
Komentar ini diminimalkan oleh moderator di situs
Kode Vba untuk menonaktifkan opsi hapus, potong, dan sisipkan di pita cangkul Excel
Komentar ini diminimalkan oleh moderator di situs
Sepotong kode yang bagus, tetapi itu tidak mencegah pengguna menggunakan {ctrl} - untuk menghapus baris...
Komentar ini diminimalkan oleh moderator di situs
Halo

Je n'arrive plus supprimer le fait de supprimer des lignes maintenant que j'ai créer kode ce VBA.
Komentar se traduit "les Vetitables" en français j'ai essayé "true" mais a ne fonctionne pas

Merci de votre respon
Komentar ini diminimalkan oleh moderator di situs
Maaf, Sand, saya tidak mengerti bahasa Prancis.
Komentar ini diminimalkan oleh moderator di situs
Sangat ramah kodenya! Terima kasih! Tapi ini tidak bisa diblokir untuk menghilangkan fila haciendo CTRL- .....
Sabrías cómo poder bloquearlo juga?

Gracias!
Komentar ini diminimalkan oleh moderator di situs
Hai, saya telah memperbarui kode di artikel, Anda dapat mencoba lagi, sekarang ini mencegah pintasan dan perintah hapus.
Belum ada komentar yang diposting di sini
Tinggalkan komentar anda
Posting sebagai Tamu
×
Beri peringkat pos ini:
0   Karakter
Lokasi yang Disarankan

Ikuti kami

Hak Cipta © 2009 - www.extendoffice.com. | Seluruh hak cipta. Dipersembahkan oleh ExtendOffice. | Peta Situs
Microsoft dan logo Office adalah merek dagang atau merek dagang terdaftar dari Microsoft Corporation di Amerika Serikat dan / atau negara lain.
Dilindungi oleh Sectigo SSL