types不匹配错误，在Excel VBA中声明范围variables

这应该是一个简单的解决方法，但我已经search和search，不知道什么是错的。

我得到一个“运行时错误13：types不匹配”：

Dim rng As Range Dim endRW As Integer, endCol As Integer endRW = 30 endCol = 10 Set rng = Sheets("Sheet1").Range(Sheets("Sheet1").Cells(2,3),Sheets("Sheet1").Cells(endRW,endCol)) 

^^^最后一行是导致错误^^^^

Answer 1

尝试

 Set rng = Sheets("Sheet1").Range(Cells(2, 3), Cells(endRW, endCol)) 

证据。

Answer 2

尝试这个

 Sub temp() Dim rng As Range Dim endRW As Long, endCol As Long endRW = 30 endCol = 10 Set rng = Worksheets("Sheet1").Range(Cells(2, 3), Cells(endRW, endCol)) End Sub