用于自动数据输入的Excel宏

时间:2012-03-16 14:18:02

标签: excel vba excel-vba

我需要一个宏来帮助我在Excel中输入数据。基本上我希望sheet 1用于数据输入,而sheet 2用于输入的数据。 Sheet 1只有一行用于数据输入,一旦填充该行,您点击回车。该行会自动添加到sheet 2中的表格中,并在sheet 1上清除该行。现在您已准备好在sheet 2中输入另一个条目。

总而言之,sheet 2将为输入的数据设置多行,sheet 1只有1行,因为它会在每个条目后自动清除它的行。

这样的事情可能吗?如果你们可以为我发布一些代码,那真的会有所帮助,请记住我以前从未在VBA中编程。在此先感谢!!

4 个答案:

答案 0 :(得分:2)

在工作表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

答案 1 :(得分:1)

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

输入将是一个实际出现在用户面前的表单,用于收集输入。当他们点击输入按钮时,您可以使用基础代码更新主表,第2页。

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

答案 2 :(得分:0)

您也可以使用数据库表单。设置数据库表然后数据>表格(2003年)

答案 3 :(得分:0)

为了不必“点击”按钮,我建议调查这个功能:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

End Sub

每次工作表中的某些内容发生更改时,此宏都会运行。 可能是您必须检查单元格A1中是否有数据,因为在输入Enter后以及将数据传输到另一个工作表后,可能会触发此VBA。