屏蔽msgbox命令,不弹出窗口
分类:VBA
在模块中编写一个屏蔽 MsgBox
命令的函数,例如:
Public Function MsgBox(prompt As String, Optional buttons As VbMsgBoxStyle = vbOKOnly, Optional title As String = "") As VbMsgBoxResult
' 屏蔽 Msgbox 命令,直接返回 vbCancel 值
MsgBox = vbCancel
End Function
该函数采用和 MsgBox
命令相同的参数格式,但它会直接返回 vbCancel
值,从而达到屏蔽的效果。