使用vab将Excel表格数据输出到TXT，左边是尺寸名称，右边是尺寸数据，并且这两组数据不相连输出到TXT

VBA (Visual Basic for Applications) 是一种宏语言，可以用于Microsoft Office应用程序，包括Excel。如果你想要使用VBA从Excel中提取数据并将其输出到TXT文件，按照以下步骤操作：

1. **打开VBA编辑器**:
- 打开Excel，按下 `Alt + F11` 进入VBA编辑器。

2. **创建一个新的模块**:
- 在VBA编辑器窗口，选择 "插入" -> "模块"，然后你会看到一个新的空白窗口。

3. **编写VBA代码**:
使用下面的代码作为模板，稍作修改以匹配你的Excel工作表结构：

Sub ExportToTXT()
    Dim ws As Worksheet ' 工作表对象
    Dim rng As Range ' 要提取的数据范围
    Dim filename As String ' TXT文件名
    Dim txtFile As Object ' 文本文件对象

    ' 替换 "Sheet1" 为你需要导出数据的工作表名字
    Set ws = ThisWorkbook.Worksheets("Sheet1")
    
    ' 定义数据范围（假设尺寸名称在A列，尺寸数据在B列）
    Set rng = ws.Range("A2:B" & ws.Cells(ws.Rows.Count, "A").End(xlUp).Row)
    
    ' 创建文件名
    filename = "尺寸数据.txt"
    
    ' 创建文本文件并写入数据
    Set txtFile = CreateObject("Scripting.FileSystemObject").CreateTextFile(filename, True)
    For Each cell In rng
        txtFile.WriteLine cell.Offset(0, -1).Value & "," & cell.Value ' 假设尺寸名称在前，数据在后，用逗号分隔
    Next cell
    
    ' 关闭文本文件
    txtFile.Close
    MsgBox "数据已成功保存到 " & filename, vbInformation
End Sub

4. **运行宏**:
- 点击 VBA 编辑器顶部的 "Run" 按钮或者按 `F5` 来运行这个宏。

这段代码会创建一个名为“尺寸数据.txt”的文件，其中左侧列包含尺寸名称，右侧列包含对应尺寸数据，每行数据之间通过逗号分隔。