DialogBox 方法

       

显示由 Microsoft Excel 4.0 宏表上的对话框定义表所定义的对话框。返回选定控制的编号,或者当用户单击“取消”按钮后,返回 False

expression.DialogBox

expression   必需。该表达式返回一个 Range 对象,该对象必须指向 Microsoft Excel 4.0 宏表上的对话框定义表。

示例

本示例运行一个 Microsoft Excel 4.0 对话框,然后在消息框中显示返回值。dialogRange 变量是指在 Microsoft Excel 4.0 宏工作表上的称为“Macro1”的对话框定义表。

Set dialogRange = Excel4MacroSheets("Macro1").Range("myDialogBox")
result = dialogRange.DialogBox
MsgBox result