Time VBA在excel中发送电子邮件

我的部分代码将信息从Excel中的一个工作表复制到另一个工作表。每次运行这个cood时，最后一行代码（activeSheet.Paste）都会出现运行时错误“1004”。有人知道怎么修吗

Sub CopyData()

    ActiveWindow.SmallScroll Down:=-9
    Sheets("sponsor & contributions 2012").Select
    Range("A1:K93").Select
    Application.CutCopyMode = False
    Selection.Copy
    Sheets("remaining payments").Select
    Selection.PasteSpecial Paste:=xlPasteFormats
    ActiveWindow.SmallScroll Down:=-12
    Range("A1:K93").Select
    ActiveSheet.Paste

End Sub

---

与模拟用户“复制+粘贴”相比，将目标范围的值设置为源范围的值更容易、更快、更可靠。e、 g

Public Sub Copy()
    Sheet2.Range("A1:K93").Value = Sheet1.Range("A1:K93").Value
End Sub

如果无法查看电子表格，确定1004错误的原因可能非常困难，因此我绝对推荐上述方法