Excel工作簿基于条件迁移数据、清理空行及刷新Power Query的按钮宏开发需求

我手头有个Excel工作簿，里面包含两个工作表：「Current」和「Archive」，想做个点击按钮就能触发的功能，完成下面三件事：

• 依据「Current」表的判断条件（D列「Action」的值等于“Done”），把对应行里A-E列的内容迁移到「Archive」表的下一个可用空行，还要保证日期格式完全保留不变。
• 数据迁移完成后，删掉「Current」表中留下的空行，避免表格里残留空白行影响使用。
• 因为「Current」表里有个Power Query，是靠该表的「ISIN」列信息获取数据的，所以做完前面两步后得把这个查询刷新一下。

迁移前的状态说明
「Current」工作表（操作前）：只要D列（Action）的值是“Done”，对应的A-E列（高亮区域）数据就需要被移至「Archive」表。

备注：内容来源于stack exchange，提问作者Raymond