excel - 处理输入框取消选择范围的操作

Question

我有以下代码:

dim selectRange as Range
Set selectRange = Application.InputBox("Select your range", "Hello", , , , , , 8)

当用户选择取消输入框提示时，它会返回未设置对象的错误。

我尝试使用 Variant 变量类型，但无法处理。如果取消，则返回False，同时如果选择范围，则返回InputBox的Range。

如何避免此错误？

Answer 1

当使用输入框选择范围时，这是一个问题。 Excel 在返回范围之前返回一个错误，并且当您按“取消”时，它会携带此错误。

因此，您应该积极处理此错误。如果您不希望按下取消键时发生任何事情，您可以使用如下代码:

Sub SetRange()
    Dim selectRange As Range

    On Error Resume Next
        Set selectRange = Application.InputBox("Select your range", "Hello", , , , , , 8)
    Err.Clear
    On Error GoTo 0
End Sub