将Excel数据复制到新工作表错误1004

Question

我正在尝试将某些信息从单元格复制到另一张电子表格中。我有一个循环遍历行的For循环。当我尝试将单元格复制到新的电子表格时，程序会出错。 我应该使用范围吗？我是否需要在单元格之前说出工作表？

这只是代码示例：

Set myOtherSheet = ThisWorkbook.Sheets("Sheet2")
For Each WkSht In ThisWorkbook.Worksheets
If WkSht.Name = "Sheet1" Then
j = 0
For r = 6 To 1000

myOtherSheet.Cells(j, 1).Value = WkSht.Cells(r, 2)
myOtherSheet.Cells(j, 2).Value = Match

我得到的错误是1004对象定义错误

Answer 1

可能由j = 0引起..没有行0 ..至少应该是..

j = 1