使用宏在excel中导入csv

Question

我想借助宏 (Visual Basic) 在 Excel 工作表中读出分号 (;) 分隔的 *.csv 文件。

我不需要 *.csv 文件中的所有数据；我只需要三个已定义的列。 这三列应导入目标 Excel 工作表的已定义列中。

有什么建议吗？

Answer 1

这个任务有两个步骤：

1. 遍历文件中的所有 .csv 文件 http://www.ozgrid.com/VBA/loop-through.htm

2. 查看每个工作簿中的所有电子表格

   Dim ws as Worksheet
   Set ws = wb.Worksheets(1) ' Set wb = Workbooks.Open( Your files ) in step 1
   ' Copy columns here
   

完成