我有一本包含 3 个工作表（本周、会议历史记录、上周）的工作簿。“本周”工作表中有 3 个表格。我的目标是将 3 个表格中的一个复制到“会议历史记录”，然后清除原始表格，以便第二天再次使用。这样做的原因是，我希望“会议历史记录”成为一周内所有会议记录的中心。我现在有一个带有宏的按钮，它只会清除表格，我希望这个按钮在清除表格之前还可以将数据复制到“会议历史记录”。如何实现这一点，以便每天都能完成这项工作，到周末，我将拥有一份完整的“会议历史记录”表格，其中包含一周内收集/格式化的信息？
这是我当前的“清除”按钮宏。我试图复制的信息是 G6-G12 和 G14 - G18 中包含的信息。其余部分不需要复制，但需要在一天结束时清除。
Sub Clearcells()
Range("F6", "F12").ClearContents
Range("G6", "G12").ClearContents
Range("H6", "H12").ClearContents
Range("G14", "G18").ClearContents
Range("H14", "H18").ClearContents
Range("H3", "H4").ClearContents
Range("H22", "H28").ClearContents
End Sub