如何使用Chr选择Range

Question

我需要使用Chr函数选择单元格“E1到E4”。

我一直在尝试使用以下代码行，但是它存在一些问题，并且代码无法编译。

它给出了运行时错误'1004'：对象'_Global'的方法'范围'失败。

Dim num2 As Integer
num2 = 69
Range("Chr(num2) & 1 : Chr(num2) & 4").Select

请帮忙。谢谢:)）

Answer 1

由于连接不正确，它无法正常工作。我建议将范围字符串存储为单独的变量，以帮助您进行调试：

Sub Test()
Dim num2 As Integer
Dim strRange As String

    num2 = 69
    'Store range string as a variable
    strRange = Chr(num2) & "1:" & Chr(num2) & "4"
    'Pass the variable into the Range function
    Range(strRange).Select

End Sub