在职场中进行数据处理,数据分析汇报与统计的过程中,经常会遇到这样的一个问题,那就是需要统计的数据源在多个文件中,多个工作薄中,如果要进行数据处理,汇总的时候会很不方便。
如果要汇总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\"
'创