0

我正在尝试将某些信息从单元格复制到另一个电子表格中。我有一个循环遍历行的 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 对象定义错误

4

1 回答 1

2

可能是由于j = 0..没有第0行..至少应该是..

j = 1
于 2013-07-12T07:54:01.603 回答