怎样将近百个csv文件导入到ACCESS后汇总再导出到一张excel表中？

Question

怎样将近百个csv文件导入到ACCESS后汇总再导出到一张excel表中？因为excel不能一次性自动导入大量的csv文件，只能用access试试，求大神帮帮忙！用VBA怎么写代码？

Answer 1

文件越多越好，使用VBA轻轻松松的实现了，不需要ACCESS中转。VBA代码的流程如下（语句没有经过调试、仅做描述算法使用）：
SUB 宏1()
DIM ST AS WORKSHEET, P AS STRING, F AS STRING

SET ST = ACTIVESHEET '汇总的表

P="C:\CSVS\" 'CSV文件所在文件夹，必须以\结尾

F=DIR(P & "*.CSV")

WHILE F<>""

WITH WORKBOOKS.OPEN (P & F) '打开CSV文件

'复制CSV文件内容到汇总表

ACTIVESHEET.USEDRANGE.COPY ST.CELLS(ST.USEDRANGE.ROWS.COUNT+1,1)

.CLOSE

END WITH

F=DIR '寻找下一个文件

WEND

END SUB追问

不太明白哪些中文字是作为注释还是作为代码本身使用？我的一大堆的csv文件在D盘的名为 ”下载内容暂存“ 的文件夹内，该文件夹内有个格式xlsx的表格，名称是 ”csv文件汇总“ ，我想把文件夹内的所有csv文件统合到名称是 ”csv文件汇总“ 的一张工作表里面（不是在工作簿内形成新的多张工作表），跪求根据上述代码修改出正确代码！

Answer 2

你导入access里面导入同一张表的数据，再在外部数据里面导出到excel.

Answer 3

直接导入不可取。。写vba进行批量处理

Answer 4

csv文件可以当做文本文件处理
批处理感觉就可以完成任务
copy *.csv aaa.txt
合并后用EXCEL打开这个文本文件就可以了