如何把Excel中单元格内容批量保存为txt文件，如图：一ID为文件名，内容保存到也对应ID命名的TXT文件中

发布网友发布时间：2022-04-29 07:34

共4个回答

热心网友时间：2023-10-13 05:31

楼上几位估计没看清楚题目就回答了，据我所知，EXCEL目前还没有这个功能，唯一希望是用VBA实现，但是我不才，不会这个。祝你好运。
------------------------------------------------------
好吧，帮你问别人要了VBA代码，执行这个宏就可以了（不会用我不再解释）。

Sub 批量保存TXT()
Dim Rng As Range
Dim obj, blogTxt
For Each Rng In Range("A2:A20000")
Myname = Rng
MyText = Rng.Offset(0, 1)
Set obj = CreateObject("scripting.filesystemobject")
Set blogTxt = obj.OpenTextFile(ThisWorkbook.Path & "\" & Myname & ".txt", 8, True)

blogTxt.Write MyText & vbCrLf
blogTxt.Close
Set obj = Nothing
Set blogTxt = Nothing
Next
End Sub

热心网友时间：2023-10-13 05:31

另存为，CSV文件。即变成文本文件。
CSV会将字段用逗号区分，文件名会以csv结尾，但你可以直接将csv改为txt.不会影响内容。

热心网友时间：2023-10-13 05:32

点菜单“文件”--“另存为”--选“TXT”类型，会跳出多工作薄无法导出，只能导出当前工作薄，点“确定”，再弹出字符格式保留对话框，点“是”。即可，注意另存的地址，不然你就找不到存哪了？

热心网友时间：2023-10-13 05:33

直接复制内容在TXT文件中粘贴，保存就行啦

热心网友时间：2023-10-13 05:31

另存为，CSV文件。即变成文本文件。
CSV会将字段用逗号区分，文件名会以csv结尾，但你可以直接将csv改为txt.不会影响内容。

热心网友时间：2023-10-13 05:32

热心网友时间：2023-10-13 05:33

直接复制内容在TXT文件中粘贴，保存就行啦