excel怎么批量转换为txt文件
展开全部
txt文件导入excel 步骤如下:
1、首先,打开excel,选择数据选项卡,自文本选项。
2、在弹出的资源管理器界面选择存放好的txt文件后,点击打开按钮。
3、此时弹出文本导入向导,由于我的数字是以空格为分隔字符的,所以我选择分隔符号,当然,如果你的文本是固定宽度,你可以选择第二个。然后点击下一步按钮。
4、勾选空格,检验预览数据是否和自己预想的一致。一致后继续点击下一步按钮。
5、查看预览效果。并选择列数据格式,此处没什么特别要求,建议选择常规,常规也是excel默认的格式。点击完成。
6、在弹出的对话框中,选中要导入的数据区域,此处我要导入到当前单元格,并且从a1单元格开始,因此我选择a1单元格,多余的数据会自动以此单元格向两边张开。点击确定按钮
我们的数据就算是完美的导入进来了。
1、首先,打开excel,选择数据选项卡,自文本选项。
2、在弹出的资源管理器界面选择存放好的txt文件后,点击打开按钮。
3、此时弹出文本导入向导,由于我的数字是以空格为分隔字符的,所以我选择分隔符号,当然,如果你的文本是固定宽度,你可以选择第二个。然后点击下一步按钮。
4、勾选空格,检验预览数据是否和自己预想的一致。一致后继续点击下一步按钮。
5、查看预览效果。并选择列数据格式,此处没什么特别要求,建议选择常规,常规也是excel默认的格式。点击完成。
6、在弹出的对话框中,选中要导入的数据区域,此处我要导入到当前单元格,并且从a1单元格开始,因此我选择a1单元格,多余的数据会自动以此单元格向两边张开。点击确定按钮
我们的数据就算是完美的导入进来了。
展开全部
第一步: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
第二步:在左边当前工作簿双击当前工作表
第三步:在右边空白处粘贴如下代码
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
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询
广告 您可能关注的内容 |