键入文本到单元格时复制表格

我有Excel表格。

我需要设置什么时候有人input文本到最后一个单元格，这样excel会自动将整个表格复制到新列表中，以便继续填充下一个数据到新列表中。

对不起，但我是Excel的初学者。 我可能需要设置“IF”语句启动macros将表复制到新列表。 但我不知道该怎么做。

提前感谢您的每一个提示和build议

Answer 1

该macros将检查A30是否为RUN_THIS ，如果是，则将A1至A29复制到从B1开始的区域。 如果你想要这些不同，你将不得不修改脚本。 要创buildmacros，请右键单击电子表格底部的工作表名称（工作表1），然后selectView Code

 Private Sub Worksheet_Change(ByVal Target As Range) Dim KeyCells As Range ' The variable KeyCells contains the cells that will ' cause an alert when they are changed. Set KeyCells = Range("A30:A30") If Not Application.Intersect(KeyCells, Range(Target.Address)) _ Is Nothing Then ' This will check to see if cell A30 is equal to RUN_THIS and It then ' copies the values from A1 through A29 to the space starting at B1 Worksheets("Sheet1").Range("A30").Select If Worksheets("Sheet1").Range("A30").Value = "RUN_THIS" Then Range("A1:A29").Select Selection.Copy Range("B1").Select ActiveSheet.Paste Range("D15").Select End If End If End Sub