根据date将数据从一张纸张推送到另一张纸张的macros

当谈到构buildmacros时，我是非常新的。 我不太了解如何build立一个。

但是我试图使用macroslogging器来创build一个自动复制标记为“报表计算器”的工作表中的数据，并将其推送到date标记的同一工作簿中的另一个工作表。

我的工作表被标记为“1”，“2”，“3”等….是否也可以添加一个filter的macros，以便它会推动数据的工作表基于date？ 我很抱歉，如果我问的是混乱。

这是我使用logging器时得到的代码，并且出现debugging错误

Sub Report1() ' ' Report1 Macro ' ActiveCell.Offset(-11, -7).Range("A1:E1").Select Selection.Copy Sheets("1").Select ActiveCell.Offset(-16, 0).Range("A1").Select Application.CutCopyMode = False ActiveSheet.Paste ActiveCell.Offset(4, 0).Range("A1").Select ActiveSheet.Paste ActiveCell.Offset(4, 0).Range("A1").Select ActiveSheet.Paste ActiveCell.Offset(4, 0).Range("A1").Select ActiveSheet.Paste ActiveCell.Offset(3, 0).Range("A1").Select ActiveSheet.Paste ActiveCell.Offset(1, 2).Range("A1").Select End Sub