Excel Outlook Vba代码给出错误1004

我随身带着这两行代码。在这里，当我将combobox的值分配给工作表（wks）的第一个单元格时，它给出了一个

错误号1004

。 让我知道一些解决方案

---

提前谢谢

如果以下任一情况为真，则可能发生此问题：

• Microsoft Visual Basic for Applications（VBA）宏在Excel 2003工作簿中复制并粘贴一整行
• Microsoft VBA宏在Excel 2003工作簿中复制并粘贴2516行或更多行

运行时错误1004表示：

Set wks = wkb.Worksheets("Calendar") 'active worksheet
    wks.Cells(NextRow, 1) = ComboBox1.Value

---

引用：

运行时错误1004通常意味着您引用的对象在工作簿中不存在

与您的案例一样

wks.Cells（NextRow，1）=ComboBox1.Value

检查变量NextRow的值，确保其大于0以避免问题

同时检查wks工作簿是否为有效的工作簿对象

---

我建议您仔细看看NextRow的价值。如果是0，我希望您会得到1004错误。请调试并检查变量NextRow和wkb的值。谢谢Alan和Santosh……你们两人的解决方案都很棒……@mon请通过标记正确答案来“结束”问题。+1我相信这就是原因：）

Runtime error 1004: Paste method of worksheet class failed.
Runtime error 1004: Copy method of Range Class Failed.