Thursday, February 14, 2019

Bagaimana Cara Menonaktifkan Menu Klik Kanan Di Worksheet Tertentu Atau Keseluruhan Buku Kerja Di Excel?

Tahukah Anda bagaimana cara menonaktifkan menu klik kanan di Excel? Artikel ini akan menunjukkan kepada Anda metode untuk menonaktifkan menu klik kanan tidak hanya di lembar kerja tertentu tetapi juga di keseluruhan buku kerja.

panah biru kanan gelembungNonaktifkan Menu Klik Kanan Di Lembar Kerja Tertentu Dengan Kode VBA



Bagian ini berbicara tentang menonaktifkan menu klik kanan di lembar kerja tertentu dengan metode VBA. Silahkan lakukan sebagai berikut.
1. Buka lembar kerja yang ingin Anda nonaktifkan menu klik kanan, klik kanan tab sheet dan kemudian klik Lihat kode dari menu konteks
2. Lalu Microsoft Visual Basic untuk Aplikasi jendela muncul Silahkan copy dan paste script VBA di bawah ini ke dalam jendela Code.
Kode VBA: Nonaktifkan menu klik kanan di worksheet yang ditentukan di Excel
1
2
3
4
5
Private Sub Worksheet_BeforeRightClick(ByVal Target As Range, Cancel As Boolean)
    Cancel = True
    MsgBox ("Sorry Right Click is Disbaled for this Worksheet"), _
    vbInformation, "Kutools for Excel"
End Sub
3. tekan lain + Q kunci untuk keluar dari Microsoft Visual Basic untuk Aplikasi jendela.
Mulai sekarang, ketika Anda mencoba klik kanan pada sel dari lembar kerja ini, Anda akan mendapatkan kotak dialog Kutools for Excel seperti gambar di bawah ini.

panah biru kanan gelembungNonaktifkan Menu Klik Kanan Di Keseluruhan Buku Kerja Dengan Kode VBA

Anda juga dapat menonaktifkan menu klik kanan di seluruh workbook dengan kode VBA berikut.
1. Di buku kerja Anda perlu menonaktifkan menu klik kanan, tekan lain + F11 kunci untuk membuka Microsoft Visual Basic untuk Aplikasi jendela.
2. Dalam Microsoft Visual Basic untuk Aplikasi jendela, silahkan klik dua kali Buku ini di kiri Project pane, lalu copy dan paste kode VBA di bawah ini ke dalam ThisWorkbook (Kode) jendela. Lihat tangkapan layar
Kode VBA: Nonaktifkan menu klik kanan di keseluruhan buku kerja di Excel
1
2
3
4
5
Private Sub Workbook_SheetBeforeRightClick(ByVal Sh As ObjectByVal Target As Range, Cancel As Boolean)
    Cancel = True
    MsgBox ("Sorry Right Click is Disbaled for this Workbook"), _
    vbInformation, "Kutools for Excel"
End Sub
3. tekan lain + Q kunci untuk keluar dari Microsoft Visual Basic untuk Aplikasi jendela.
Mulai saat ini, ketika Anda mencoba klik kanan pada sel di buku kerja, kotak dialog Kutools for Excel akan muncul untuk mengingatkan Anda bahwa menu klik kanan telah dinonaktifkan. Lihat tangkapan layar
Ditulis oleh eMHa On 8:25 PM No comments

0 comments:

Post a Comment

  • RSS
  • Delicious
  • Digg
  • Facebook
  • Twitter
  • Linkedin
  • Youtube