获取运行时错误9和编译错误运行

Question

我从另一张表中获取单元格的值（字符串），方法是在for循环下运行它。它显示运行时错误9.它显示编译错误，所以我删除了set，​​现在它显示运行时错误9.请找到以下代码供参考：

For i = 2 To lastCol
    res_nam1 = Worksheets("sheet1").Range("B" & i).Value
    MsgBox res_nam1   
Next i