如何把excel表格中的内容批量转换成txt文档？

excel内容批量生成txt文档，excel批量每行生成一个txt文档

excel表格中一行导出为一个txt文档的方法

第一步：ATL+F11

第二步：在左边当前工作簿双击当前工作表(一定要选表，否则老是不成功）

选表窗口如果消失，可以点击：视图——工程资源管理器 调出

第三步：在右边空白处（代码窗口）粘贴如下代码

Sub txt()

On Error Resume Next

MkDir "d:\导出TXT"

Dim i As Long, a As String, b As String

For i = 1 To Cells(65536, 1).End(xlUp).Row

    a = Cells(i, 1)

    b = Cells(i, 2)

    Open "d:\导出TXT\" & a & ".txt" For Output As #1

    Print #1, b

    Close #1

Next i

MsgBox "完成" & i & "条数据导出"

End Sub

第四步：F5运行，导出的TXT文件在：d:\导出TXT