Excel宏用于自动输入数据

Question

我需要一个宏来帮助我在Excel中进行数据输入。 基本上，我希望工作sheet 1用于输入数据，工作sheet 2用于输入数据。 Sheet 1只会有一行用于输入数据，填满该行后，请按Enter。 该行将自动添加到工作表sheet 2的表中，并且该行在工作sheet 1被清除。 现在，您准备在工作sheet 2输入另一个条目。

因此，总结一下，工作sheet 2将有多行用于输入的数据，工作sheet 1将仅具有1行，因为它会在每次输入后自动清除该行。

这样的事情可能吗？ 如果你们可以为我发布一些代码，那将非常有帮助，请记住，我以前从未在VBA中编程过。 提前致谢！！

Answer 1

在工作表1上放置一个按钮，然后将此宏放入常规代码模块中并将其附加到按钮上。 假设您要在row2上输入值（row1是标题等），那么这会将row2数据传输到sheet2上的下一个空行：

Sub Transfer()
    Rows(2).Copy Sheets("Sheet2").Range("A" & Rows.Count).End(xlUp).Offset(1)
    Rows(2).ClearContents
End Sub

Answer 2

我不确定用例，但是您是否考虑过使用Excel UserForms。

输入将是实际上出现在用户面前的表单，该表单将收集输入。 当他们按下Enter键时，您可能具有基础代码来更新主工作表Sheet 2。

http://www.excel-vba-easy.com/vba-userform-excel-vba.html

Answer 3

您也可以使用数据库表格。 设置数据库表，然后选择“数据”>“表单”（2003年）

Answer 4

为了不必“单击”按钮，我建议研究一下此功能：

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

End Sub

每当工作表中的某些内容发生更改时，此宏就会运行。 可能必须检查单元格A1中是否有数据，因为此VBA可能会在按下Enter键之后以及在将数据传输到另一张纸之后触发。