Excel宏处理之多页数据合并

首先需要创建一个格式相同的标准表单。如图。

录制一个名为"Sheetcombine"的空宏。操作如图。

编辑录制的"Sheetcombine"的宏。

将如下斜体加黑代码拷贝粘帖进"Sheetcombine"宏。 注：其中sh.Name <> "New" 为定义为不需要合并的工作簿的名称，根据需要更改。 Sub Sheetcombine()''合并表单名称不为"New"的所有表单内容到"Sum"表单'End Sub

将宏保存到喜欢的文件夹， 注意选择文件类型为Excel Add-in。如图。

从刚才保存的文件夹内调用上一步保存的宏“Sheetcombine".

将加载的"Sheetcombine"添加到快捷工具栏。

大工告成。点击快捷工具栏看看结果吧。