Question

我是Excel VBA的新手，似乎无法弄清楚为什么我一直收到错误80010108“对象'Range'的方法'值'失败了。”如果有人能帮助我，我将非常感激!!

我使用命令按钮（“添加新”）创建了一个UserForm（“MainView”），这会打开另一个包含另一个命令按钮（“Enter”）的UserForm（“AddNewWorkOrder”）。我想要这个输入命令按钮将在此用户窗体的文本框中键入的所有数据输入到活动工作表的相应列中。 **我需要在工作表中的表中添加行

现在，当我运行MainView然后单击“Add New”以显示AddNewWorkOrder时，我无法输入数据，因为单击“Enter”将抛出错误80010108并崩溃Excel（提示重新启动Excel）。

但是，如果我直接运行AddNewWorkOrder UserForm而不通过MainView，它将完全按照需要输入数据。

这是我为MainView的“添加新内容”编写的代码：

Private Sub AddNew_Click()

Me.Hide
AddNewWorkOrder.Show

End Sub

这是我为“Enter”编写的代码（为简单起见，只包括一个文本框）：

Private Sub EnterCommandButton_Click()

Range("A" & Rows.Count).End(xlUp).Select

HoldVal = ActiveCell.Value + 1
MsgBox HoldVal
ActiveCell.Offset(1, 0).Value = HoldVal

ActiveCell.Offset(1, 1).Select
ActiveCell.Value = Me.ItemSizeTextBox

Me.Hide
MainView.Show

End Sub

编辑：“ActiveCell.Offset（1,0）.Value = HoldVal”这一行是我收到错误的地方

Excel VBA用户窗体错误

0 个答案: