Modifikasi klik kanan pada excel - Coba anda buka micorosoft excel anda, lalu arahkan ponter kesalah satu sel, klik kanan pada mouse yang muncul adalah opsi menu Cut, Copy, Paste Options, Insert, Delete, ClearContents dan yang paling bawah adalah opsi Hyperlink. Jika anda terasa bosa dengan opsi yang ada maka anda bisa menambahkanya sendiri sesuai keinginan anda

Baca juga cara menonaktifkan klik kanan pada excel

Menambahkan Opsi Klik kanan Pada Excel

Untuk Menambahkan Opsi Klik kanan Pada Excel caranya cukp mudah dan hanya memerlukan kode macro beberapa baris saja, agar menu tambahan bisa langsung berjalan pastikan anda mengaktifkan macro pada excel serta simpan workbook dengan format enabled macro

Selanjutnya masuk kejendela VBE dowuble klik Thisworkbook , ketik kode macro menambah opsi klik kanan pada excel

Private Sub Workbook_Activate()
On Error Resume Next
Dim NewControl As CommandBarControl
Application.OnKey "+^{C}"
Application.CommandBars("Cell").Controls("Buka Form").Delete
Set NewControl = Application.CommandBars("Cell").Controls.Add
With NewControl
.Caption = "Buka Form"
.OnAction = "OpenUserform"
.BeginGroup = True
End With
End Sub

Keterangan :
Application.CommandBars("Cell").Controls("Buka Form").Delete : Jika kode macro ini tidak anda ketik maka opsi yang dibuat sebelumnya akan tetap ada alias tidak dihapus, akibatnya menu tambahan akan menumpuk, silahkan praktekan sendiri jika tidak percaya
.Caption = "Buka Form" : Nama atau Caption menu tambahan yang akan tampil
.OnAction = "OpenUserform" : Kode macro atau prosedur yang dijalankan saat anda mengklik menu Buka Form


Sampai disini anda telah berhasil membuat menu klik kanan bertambah, tugas selanjutnya adalah membuat prosedur yang akan dijalankan apabila menu tadi diklik dipilih dipencet di........... terserahlah bahasanya mau apa :>
Contoh saya akan membuat prosedur kotak dialog saja

Sub OpenUserform
Msgbox "Hy ... Saya belajar excel VBA di www.asis10.com", , "Asis10.com"
End SUb

Silahkan anda bisa membuat prosedur sesuka hati anda, Coba ingat baik baik artikel ini karena pada kesempatan yang akan datang saya akan kembali menggunakan teori ini untuk menampilkan kalender disetiap workbook excel yang anda buka atau memanggil kalkulator , pasti bermanfaat, maka dari itu simpan bookmark baik baik

Langkah terakhir yaitu menghapus menu tambahan tadi agar tidak tampil muncul disembarangan workbook, ketikan ini di Thisworkbook

Private Sub Workbook_BeforeClose(Cancel As Boolean)
On Error Resume Next
Application.OnKey "+^{C}"
Application.CommandBars("Cell").Controls("Buka Form").Delete
End Sub

Kelar sudah , jika anda masih kebingungan dengan artikel ini silahkan download file sampel yan telah saya sediakan pada link download dibawah.

Download - Modifikasi klik kanan pada excel

#MenambahkanOpsiKlikkananPadaExcel #ExcelPro #Macro #VBA #MacroExcel #ExcelVba #BelajarExcel #BelajarMacro #BelajarVBA #KelasExcel #RumahExcel
ExcelPro, Excel Pro, Macro, VBA, #MacroExcel, ExcelVba, BelajarExcel, BelajarMacro, BelajarVBA, KelasExcel, RumahExcel

Demikianlah cara Modifikasi klik kanan pada excel semoga bermanfaat. Follow IG kami atau Like fanpage Asis10.com dapatkan update seputar excel VBA hanya di Asis10.com
No comments