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

我有这两行代码。在这里，它给了我一个error number 1004何时将组合框的值分配给工作表（wks）的第一个单元格的时间。让我知道一些解决方案....

提前谢谢....

4

2 回答 2

2

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

与您的情况一样， wks.Cells(NextRow, 1) = ComboBox1.Value 检查变量 NextRow 的值并确保其大于 0 以避免该问题。

还要检查 wks 工作簿是有效的工作簿对象。

在此处输入图像描述

于 2013-04-17T07:29:30.387 回答
1

如果以下任一条件为真，则可能会出现此问题：

  • Microsoft Visual Basic for Applications (VBA) 宏在 Excel 2003 工作簿中复制并粘贴一整行。
  • Microsoft VBA 宏在 Excel 2003 工作簿中复制并粘贴 2,516 行或更多行。

运行时错误 1004 表示：

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

参考： http: //support.microsoft.com/kb/905164

于 2013-04-17T07:23:42.063 回答