关于用inputbox选择单元格区域的时候点击"取消"的奇怪问题

Moneky

原帖由 jdmlw 于 2010-10-20 00:02 发表
明白了TYPE=8的意思，可否有详细说明？

善用系统自带帮助，非常有用

Excel 开发人员参考Application.InputBox 方法
显示一个接收用户输入的对话框。返回此对话框中输入的信息。

语法
表达式.InputBox(Prompt, Title, Default, Left, Top, HelpFile, HelpContextID, Type)
表达式   一个代表 Application 对象的变量。

参数

名称	必选/可选	数据类型	描述
Prompt	必选	String	要在对话框中显示的消息。可为字符串、数字、日期、或布尔值（在显示之前，Microsoft Excel 自动将其值强制转换为 String）。
Title	可选	Variant	输入框的标题。如果省略该参数，默认标题将为“Input”。
Default	可选	Variant	指定一个初始值，该值在对话框最初显示时出现在文本框中。如果省略该参数，文本框将为空。该值可以是 Range 对象。
Left	可选	Variant	指定对话框相对于屏幕左上角的 X 坐标（以磅 （磅：指打印的字符的高度的度量单位。1 磅等于 1/72 英寸，或大约等于 1 厘米的 1/28。）为单位）。
Top	可选	Variant	指定对话框相对于屏幕左上角的 Y 坐标（以磅为单位）。
HelpFile	可选	Variant	此输入框使用的帮助文件名。如果存在 HelpFile 和 HelpContextID 参数，对话框中将出现一个帮助按钮。
HelpContextID	可选	Variant	HelpFile 中帮助主题的上下文 ID 号。
Type	可选	Variant	指定返回的数据类型。如果省略该参数，对话框将返回文本。

返回值
Variant
说明

下表列出了可以在 Type 参数中传递的值。可以为下列值之一或其中几个值的和。例如，对于一个可接受文本和数字的输入框，将 Type 设置为 1 + 2。

值	含义
0	公式
1	数字
2	文本（字符串）
4	逻辑值（True 或 False）
8	单元格引用，作为一个 Range 对象
16	错误值，如 #N/A
64	数值数组

使用 InputBox 可以显示一个简单的对话框，以便可以输入要在宏中使用的信息。此对话框有一个“确定”按钮和一个“取消”按钮。如果选择了“确定”按钮，则 InputBox 将返回对话框中输入的值。如果单击“取消”按钮，则 InputBox 返回 False。
如果 Type 为 0，InputBox 将以文本格式返回公式。例如，“=2*PI()/360”。如果公式中有引用，将以 A1-样式引用返回（使用 ConvertFormula 转换引用样式）。
如果 Type 为 8，InputBox 将返回一个 Range 对象。您必须用 Set 语句将结果指定给一个 Range 对象，如下例所示。

Set myRange = Application.InputBox(prompt := "Sample", type := 8)

如果不使用 Set 语句，此变量将被设置为这个区域的值，而不是 Range 这个对象本身。
如果使用 InputBox 方法要求用户输入公式，则必须使用 FormulaLocal 属性来将此公式指定给一个 Range 对象。输入的公式使用用户语言。
InputBox 方法与 InputBox 函数的区别在于：它可以对用户的输入进行选择性验证，也可用于 Microsoft Excel 对象、误差值、和公式的输入。注意，Application.InputBox 调用的是 InputBox 方法，不带对象识别符的 InputBox 调用的是 InputBox 函数。

示例

本示例提示用户输入数字。

Visual Basic for Applications

myNum = Application.InputBox("Enter a number")

本示例提示用户在 Sheet1 中选取一个单元格。示例使用 Type 参数证实返回值是有效的单元格引用 (一个 Range 对象)。

Visual Basic for Applications

Worksheets("Sheet1").ActivateSet myCell = Application.InputBox( _    prompt:="Select a cell", Type:=8)

[ 本帖最后由 Moneky 于 2010-10-20 08:24 编辑 ]

tiantian0623

请问如果type:=8，在inputbox对话框中输入数字，会产生错误吗

ssjun-ssjun

Moneky 发表于 2010-10-20 08:21
善用系统自带帮助，非常有用

Excel 开发人员参考Application.InputBox 方法

学习受教了，谢谢！

纵鹤擒龙水中月

过来学习一下