为什么Office2003Excel VBA的Application.Input函数在单元格有条件格式时不能输入区域数据(Type:=8)？

发布网友发布时间：2022-12-29 16:14

共3个回答

热心网友时间：2023-10-27 01:54

如果 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").Activate
Set myCell = Application.InputBox( _
prompt:="Select a cell", Type:=8)

热心网友时间：2023-10-27 01:55

应该用 Application.InputBox吧

热心网友时间：2023-10-27 01:55

学习学习。