Bagaimana cara menonaktifkan fungsi potong, salin dan tempel di Excel?
Misalkan Anda memiliki buku kerja dengan data penting yang perlu Anda lindungi agar tidak dipotong, disalin, dan ditempel. Bagaimana cara mencapainya? Artikel ini menyediakan metode VBA bagi Anda untuk menonaktifkan fungsi potong, salin, dan tempel secara bersamaan di buku kerja Excel.
Nonaktifkan fungsi potong, salin, dan tempel dengan kode VBA
Nonaktifkan fungsi potong, salin, dan tempel dengan kode VBA
Harap lakukan hal berikut untuk menonaktifkan fungsi potong, salin, dan tempel di buku kerja Excel.
1. Di buku kerja Anda perlu menonaktifkan fungsi potong, salin dan tempel, silakan tekan lain + F11 tombol secara bersamaan untuk membuka Microsoft Visual Basic untuk Aplikasi jendela.
2. Dalam Microsoft Visual Basic untuk Aplikasi jendela, silakan klik dua kali Buku Kerja Ini di kiri Project panel, lalu salin dan tempel kode VBA di bawah ini ke file ThisWorkbook (Kode) jendela. Lihat tangkapan layar:
Kode VBA: Nonaktifkan fungsi potong, salin, dan tempel secara bersamaan di Excel
Private Sub Workbook_Activate()
Application.CutCopyMode = False
Application.OnKey "^c", ""
Application.CellDragAndDrop = False
End Sub
Private Sub Workbook_Deactivate()
Application.CellDragAndDrop = True
Application.OnKey "^c"
Application.CutCopyMode = False
End Sub
Private Sub Workbook_WindowActivate(ByVal Wn As Window)
Application.CutCopyMode = False
Application.OnKey "^c", ""
Application.CellDragAndDrop = False
End Sub
Private Sub Workbook_WindowDeactivate(ByVal Wn As Window)
Application.CellDragAndDrop = True
Application.OnKey "^c"
Application.CutCopyMode = False
End Sub
Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range)
Application.CutCopyMode = False
End Sub
Private Sub Workbook_SheetActivate(ByVal Sh As Object)
Application.OnKey "^c", ""
Application.CellDragAndDrop = False
Application.CutCopyMode = False
End Sub
Private Sub Workbook_SheetDeactivate(ByVal Sh As Object)
Application.CutCopyMode = False
End Sub
3. Kemudian silahkan tekan lain + Q kunci untuk keluar dari Microsoft Visual Basic untuk Aplikasi jendela.
Sekarang Anda tidak dapat memotong atau menyalin data dari buku kerja ini, sementara itu, data yang telah Anda salin dari lembar atau buku kerja lain tidak dapat ditempelkan ke dalam buku kerja ini.
Note: Fungsi seret dan lepas juga dinonaktifkan setelah menjalankan kode VBA di atas.
Terkait artikel:
- Bagaimana cara menonaktifkan klik kanan pada tab sheet di Excel?
- Bagaimana cara menonaktifkan menu klik kanan di lembar kerja tertentu atau seluruh buku kerja di Excel?
- Bagaimana cara mencegah atau menonaktifkan mode edit dengan mengklik dua kali sel di Excel?
Alat Produktivitas Kantor Terbaik
Tingkatkan Keterampilan Excel Anda dengan Kutools for Excel, dan Rasakan Efisiensi yang Belum Pernah Ada Sebelumnya. Kutools for Excel Menawarkan Lebih dari 300 Fitur Lanjutan untuk Meningkatkan Produktivitas dan Menghemat Waktu. Klik Di Sini untuk Mendapatkan Fitur yang Paling Anda Butuhkan...
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!