《Excel VBA实例教程 #017：双击被保护单元格时不显示提示消息框》由会员分享，可在线阅读，更多相关《Excel VBA实例教程 #017：双击被保护单元格时不显示提示消息框（2页珍藏版）》请在金锄头文库上搜索。
当用户使用鼠标左键双击被保护工作表中锁定的单元格区域时，系统将显示如图1所示的消息框。图 1 系统提示消息框如果不希望显示该消息框，可以在工作表Worksheet_BeforeDoubleClick事件中进行设置，如下面的代码所示。1. Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)2. If Target.Locked = True Then3. MsgBox 此单元格已保护，不能编辑!4. Cancel = True5. End If6. End Sub代码解析：当用户使用鼠标左键双击工作表单元格时，触发Worksheet_BeforeDoubleClick事件。该事件中的Target参数代表用户双击鼠标左键的单元格区域。参数Cancel设置是否取消该操作。如果将参数Cancel设置为True，将不进行默认的双击操作。第2行代码中判断用户双击鼠标左键的单元格区域是否已锁定（Range对象的Locked属性返回或设置Range对象是否锁定），如果单元格区域已锁定，则设置参数Cancel设置为True，不进行默认的双击操作，因而不再显示图1所示的消息框，只显示一个自定义的提示信息，如图2所示。图2 自定义提示信息
