时间戳

首页 > 解决方案 > 如何修复“cmbSave_Click 按钮上的运行时错误 1004”，以及将数据从宏传输到数据表的帮助

excel - 如何修复“cmbSave_Click 按钮上的运行时错误 1004”，以及将数据从宏传输到数据表的帮助

问题描述

我正在构建一个基于宏的电子表格，以将输入的数据传输到另一个标有“数据”的工作表。当我单击 cmbSave_Click() 按钮时，我只收到运行时错误 1004。我觉得问题在于我的代码行是“iRow = Sheets("Data").Range("A40").End.Row + 1"，但我不确定。我还在努力学习 excel VBA。

我尝试过调试代码并尝试评论代码以尝试提出解决方案。

Private Sub cmbSave_Click()

Application.ScreenUpdating = True

Dim iRow As Long

iRow = Sheets("Data").Range("A50").End(x1down).Row + 1

If ValidateForm = True Then

With ThisWorkbook.Sheets("Data")

   .Range("A" & iRow).Value = iRow - 1
   .Range("B" & iRow).Value = txtName.Value
   .Range("C" & iRow).Value = txtScholar.Value
   .Range("D" & iRow).Value = txtDate.Value
   .Range("E" & iRow).Value = txtSession.Value
   .Range("F" & iRow).Value = cmbReason.Text
   .Range("G" & iRow).Value = txtComments.Value

End With

Call Reset

Else

Application.ScreenUpdating = True

Exit Sub

   End If

     Application.ScreenUpdating = True

数据应该能够输入并保存到另一个“数据”表中

标签： excelvba

解决方案

推荐阅读