excel - “更新？”的含义 调试模式下的消息

Question

Sub update_button()
'
' update_button Makro
'

'

Set from = Sheet1
Set towards = Sheet5

With from
    lastRowIndex = .Cells(.Rows.Count, "A").End(xlUp).Row
    .Range(Cells(2, 1), Cells(lastRowIndex, 4)).Copy
End With
towards.Cells(7, 1).Paste

End Sub

此代码应该复制 A2 和第一张纸的最后一行之间的单元格。然后将其粘贴到另一张纸的特定单元格中。运行此代码给我运行时错误 1004。应用程序定义或对象定义错误。

通过进入调试模式，并将鼠标悬停在 Cells(2,1) 上，会出现一条消息，提示 Cells(2,1)="Updated?"。据我所知， Cells(2,1) 定义明确，应该没有问题。鉴于名称的通用性，我无法搜索有关它的任何内容。

请注意，我有一个非英语版本的 excel，并且我已经翻译了一些单词以使代码稍微不那么混乱。

标签： excelvba

Answer 1

替换你的指令

.Range(Cells(2, 1), Cells(lastRowIndex, 4)).Copy

和

Range(.Cells(2, 1), .Cells(lastRowIndex, 4)).Copy