运行时错误1004 Excel 2013

我正在使用此宏向单元格中添加一些条目。我只想将2个值添加到文本框中，然后按下按钮将条目移动到Sheet2中。第二次，2个条目将移动到第一个条目下方，依此类推

每次按下按钮，我都会收到消息“运行时错误1004”。

更改

ws.Cells（Rows.Count，1）。End（x1Up）。Offset（1，0）。Row

到

ws.Cells（Rows.Count，1）。结束（xlUp）。偏移量（1，0）。行

结尾的粗体字符（xlUp）是一个l，与lion中的一样，而不是1（1）

---

在userform中，您还可以使用以下

Me.TextBox1.Value

。命名用户表单也会起作用，但另一个用户表单的编写速度更快。

您的问题已经由专业人员确定，但下面是如何在将来定位和解决类似问题

编译错误：未定义变量

设置需要在VBE的工具中声明变量► 选择权► 编辑器属性页将把语句放在每个新创建的代码表的顶部。这 将避免愚蠢的编码错误，如拼写错误，以及影响您在变量中使用正确的变量类型 宣言。在没有声明的情况下动态创建的变量都是变量/对象类型

简单变量/常量拼写错误编译器错误（X1UP应为XLUP）

当您在运行时收到错误时，转到VBE中的sub并点击F8。编译器将立即发出编译错误消息，并突出显示语句中有问题的部分

虽然这不能解决所有的编译错误，但它使简单的错误快速且易于识别和纠正

附录-编译错误：语法错误

有一种特殊情况涉及拼写错误的变量，应予以解决。声明、赋值或使用名称以数字开头的变量是非法语法。语法错误取代变量未定义错误；有两个错误，但报告的主要错误是语法错误。在这种情况下，将突出显示整个代码行

以数字作为第一个字符的变量拼写错误编译器错误（1ROW应为LROW）

您正在使用显式父工作表引用编写良好的代码，而不是依赖隐式父工作表引用。使用Require variable declaration选项更进一步。使用选项显式是

---

被广泛认为是“最佳实践”。

好的收获！超级视觉必须帮助眼镜蛇。绝对！你为什么认为我还活着非常感谢你。有时最常见的错误就在眼前，你看不见它们。欢迎你！但是，您可以通过遵循下面@Jeeped的建议来避免这些类型的简单错误。另外，请在回答时标记螺纹。谢谢完全同意！感谢您提供有关“需要变量声明”的提示。

 Private Sub CommandButton1_Click()
 Dim lRow As Long
 Dim ws As Worksheet
 Set ws = Worksheets("Sheet2")
 lRow = ws.Cells(Rows.Count, 1).End(x1Up).Offset(1, 0).Row
 With ws
.Cells(lRow, 1).Value = UserForm1.TextBox1.Value
.Cells(lRow, 2).Value = UserForm1.TextBox2.Value
 End With
 End Sub