Excel VBA UserForm错误

我很新的Excel VBA,似乎无法弄清楚为什么我总是得到错误80010108“方法'值'对象'范围'失败。 如果有人能帮助我,将非常感谢!

我用一个命令button(“Add New”)创build了一个UserForm(“MainView”),该button带来了另一个包含另一个命令button(“Enter”)的UserForm(“AddNewWorkOrder”)。 我希望使用此Enter命令button将在此用户窗体文本框中键入的所有数据input到活动工作表的相应列中。 **我需要添加行到工作表中的表格

现在当我运行MainView,然后点击“添加新的”来调出AddNewWorkOrder,然后我无法input数据,因为点击“Enter”会引发错误80010108并崩溃Excel(提示重新启动Excel)。

但是,如果我直接运行AddNewWorkOrder用户窗体,而无需通过MainView,它将根据需要input数据。

这是我为MainView的“添加新”的代码:

Private Sub AddNew_Click() Me.Hide AddNewWorkOrder.Show End Sub 

这是我input的代码(包括简单的一个文本框):

 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”是我得到一个错误