Question

我是VBA的初学者。如何在excel中导入csv文件？我知道如何在VB6中做到这一点但在VBA中我试图搜索一个常见的对话框，但我找不到它。提前感谢您的帮助。

Answer 1

如果您只想检查某些值然后关闭该文件，您只需将其打开为新的工作簿，如下所示：

Dim wb as Workbook
Set wb = Workbooks.Open(Filename:=[YourPathHere], Delimiter:="[YourDelimeter]")

编辑：如果你想在一个循环中这样做，让我们想象你的工作簿名称位于单元格＆＃34; A1：A10＆＃34;并且您希望对每个文件进行数据操作

Dim wb as Workbook
Dim iCounter as Integer

For iCounter = 1 to 10
     Set wb = Workbooks.Open(Filename:=Range("A" & iCounter).value,Delimiter:="[YourDelimiter]")
     //Do some manipulation with opened CSV file
Next iCounter

Answer 2

Workbooks.Open "C:\path\filename.csv"

或您正在使用的任何驱动器

使用VBA导入CSV文件

2 个答案: