我的目標(biāo)：讓中國的大學(xué)生走出校門的那一刻就已經(jīng)具備這些Office技能，讓職場人士能高效使用Office為其服務(wù)。支持鵬哥，也為自己加油！

前幾天寫過一篇文章：

《在Excel中禁用右鍵菜單你會嗎？》

在Excel中利用工作表事件可以實現(xiàn)當(dāng)點擊右鍵時不彈出右鍵菜單，但是當(dāng)我們按下彈出右鍵菜單的快捷鍵Shift+F10時，照樣會彈出右鍵菜單，而且是可以使用的。

那怎么才能真正的禁用右鍵菜單呢？也就是說不僅要點擊右鍵不會彈出右鍵菜單，而且當(dāng)按下Shift+F10時也不會彈出右鍵菜單。

要想解決上述問題，我們先要學(xué)習(xí)一個知識點，如何在VBA中讓指定按下鍵盤上某個鍵時能發(fā)生一個事件，這就是所謂的OnKey事件，即按下某個鍵會執(zhí)行一個特定的過程。

案例：

實現(xiàn)效果：按下Shift+F10后彈出一個消息框，顯示：你好，Shift+F10已被禁用

首先寫一個過程：

然后把這個過程的快捷鍵指定為Shift+F10：

Sub SetupNoShiftF10()    Application.OnKey '+{F10}', 'NoShiftF10'End Sub

這樣，當(dāng)運行完SetupNoShiftF10過程后，Application.OnKey '+{F10}', 'NoShiftF10'就把Shift+F10指定為觸發(fā)程序NoShiftF10。

所以，當(dāng)我們按下Shift+F10以后，就會自動運行NoShiftF10過程。

OnKey事件的基本語法：

Application.OnKey '某個鍵', '某個程序'

那怎么讓快捷鍵恢復(fù)原來的功能呢？比如要讓上面的Shift+F10恢復(fù)彈出快捷鍵的功能呢？

向右滑動可以查看完整代碼

Application.OnKey '某個鍵'

OnKey方法的第二個參數(shù)不寫，這樣就會恢復(fù)這個鍵本來的作用。

具體鍵的書寫代碼如下：

單個鍵：

組合鍵：

比如：上述案例中Shift+F10，表示為：+{F10}

本節(jié)的分享就到這里，鵬哥祝大家每天都有進步。

學(xué)習(xí)點VBA技術(shù)，從此高效工作！

從基礎(chǔ)操作到VBA，

兩杯咖啡的錢，

換取一份如此詳細(xì)的Excel視頻資料，

你還在猶豫？

欲購從速，聯(lián)系微信號：527240310

非誠勿擾！