Contoh Kode Macro Event: Klik Kanan pada Sel dalam Excel VBA
Contoh kode macro di bawah ini menjalankan event jika Anda meng-klik kanan suatu sel di kolom A, maka sel yang kosong atau bahkan sel yang sudah memiliki konten di dalamnya, akan mencatat tanggal dan waktu di dalam sel tersebut sesuai dengan waktu saat Anda melakukan klik-kanan, sementara sel-sel lainnya tidak mengalami perubahan.
Event Worksheet_BeforeRightClick dicetuskan oleh klik-kanan pada suatu sel worksheet.
Adapun argumen Cancel bersifat pilihan dan fungsinya untuk mencegah sel untuk membuka menu pop-up atau menu pintas pada saat sel tersebut di klik kanan.
Event ini tidak akan terjadi jika Anda meng-klik kanan tepat pada bagian tepi sel yang aktif.
Ikuti langkah-langkah berikut untuk membuat kode macronya:
1. Dalam Excel, klik kanan tab sheet yang akan diuji-coba.
2. Pilih View Code.
3. Pada kotak pilihan Object (General) di atas module worksheet klik tanda panah di ujungnya.
4. Pilih Worksheet.
5. Pada kotak pilihan Procedure (Declarations) di atas module worksheet, klik tanda panahnya di ujungnya.
6. Pilih event BeforeRightClick.
7. Ketik kode berikut tepat dibawah Private Sub Worksheet_BeforeRightClick:
Cancel = True
Target.Value = Format(VBA.Now, "DD MMMM YYYY, hh:mm")
Columns(Target.Column).AutoFit
8. Kode lengkapnya menjadi seperti berikut:
Cancel As Boolean)
If Target.Column <> 1 Then Exit Sub
Cancel = True
Target.Value = Format(VBA.Now, "DD MMMM YYYY, hh:mm")
Columns(Target.Column).AutoFit
End Sub
9. Tekan Alt+F11 untuk kembali ke jendela Excel.
10. Klik kanan pada salah satu sel yang mana saja di kolom ke-1 atau kolom A.
Demikian pembahasan tentang event Worksheet_BeforeDoubleClick dalam macro VBA Excel.
Selamat mempraktikkan dan semoga postingan ini bermanfaat.