书籍
Visual Basic for Applications
第10章. 数据格式与序列化
处理CSV文件

Visual Basic for Applications:
处理CSV文件

如何操作：

Visual Basic for Applications (VBA) 通过内置函数和方法简化了与 CSV 文件的工作，无缝地允许从这些文件中读取和写入。下面是与 CSV 文件操作相关的基本示例。

读取 CSV 文件： 

Sub ReadCSV()
    Dim filePath As String
    filePath = "C:\example.csv"
    
    Open filePath For Input As #1
    
    Do Until EOF(1)
        Dim line As String
        Line Input #1, line
        Dim dataFields() As String
        dataFields = Split(line, ",")
        
        '根据需要处理 dataFields 数组
        Debug.Print Join(dataFields, ";") '示例输出显示逗号转换为分号
    Loop
    
    Close #1
End Sub

写入 CSV 文件： 

Sub WriteCSV()
    Dim filePath As String
    filePath = "C:\output.csv"
    Dim dataToWrite As String
    dataToWrite = "ID,Name,Age" & vbCrLf & "1,John Doe,30" & vbCrLf & "2,Jane Doe,29"
    
    Open filePath For Output As #1
    Print #1, dataToWrite
    Close #1
End Sub

output.csv 中的示例输出：

ID,Name,Age
1,John Doe,30
2,Jane Doe,29

深入了解

从历史上看，CSV 文件一直是一种将表格数据存储在文本格式中的直接方法。其结构的简单性，每一行对应一个数据记录，每个记录内的字段由逗号分隔，既是 CSV 的优势也是其局限性。该格式原生不支持数据类型，这意味着所有数据都被存储为字符串，将数据转换为正确类型的负担落在了程序员身上。

在 Visual Basic for Applications 中，处理 CSV 文件主要通过基本文件操作完成，如前面的示例所示。没有直接的 CSV 解析支持，如更现代的语言（例如，Python 的 csv 模块）所提供的，这提供了更多控制和便利性，以处理 CSV 数据。

对于更复杂的操作或处理大型 CSV 文件时，程序员可能会发现在纯 VBA 之外有更好的替代方案，例如利用外部库或使用具备更复杂 CSV 处理能力的其他编程语言。然而，对于与 CSV 文件相关的简单任务，VBA 的直接方法通常足够且易于实现，为基于 Excel 的应用或其他 Microsoft Office 软件自动化提供了快速解决方案。

使用JSON工作