ChatGPT AIGC 快速合并Excel工作薄 Vlookup+INDIRECT

在职场中进行数据处理，数据分析汇报与统计的过程中，经常会遇到这样的一个问题，那就是需要统计的数据源在多个文件中，多个工作薄中，如果要进行数据处理，汇总的时候会很不方便。

如果要汇总6个月的数据可能就得需要手动复制了。

再或者用其它方法来进行数据合并。

例如我们可以使用非常高效的VBA来实现文件合并操作。

是不是在想，我不会写VBA，我也不会语法编辑。

怎么办呢？

给ChatGPT发送指令Prompt：（请写个VBA代码，将路径为“C:\Users\EDY\Documents\Excel”的文件夹中的所有Excel工作簿合并为一个新的工作簿，合并的工作簿也要在该文件夹里，新工作簿的每个工作表保留原工作簿对应的文件名）

Sub MergeWorkbooks()
 
Dim Path As String, Filename As String
 
Dim wb As Workbook, NewBook As Workbook
 
Dim ws As Worksheet
 
 
 
'设置文件夹路径
 
Path = "C:\Users\EDY\Documents\Excel\"
 
'创