菜鸟又来问了,如何把excel转成txt文档

Question

要求如下图,excel转txt文档,不知VB可以实现不,这文档也是用VB的open output 生成的!

Answer 1

这说的是中文吗！？
既然是用 VB 的 Open Output 模式输出的文件，首先就有文本文件了。
怎么又要“excel转txt文档”？

Answer 2

你说的是 将 .text后缀名 改成 。csv吗

Answer 3

可能我的意思有点误导了,就是说把excel转为txt文档格式如图,我就想问VB 可以实现不

Answer 4

  不是啊!就excel转txt,用VB来实现

Answer 5

在 Excel 中录一个宏：另存为 csv 格式即可。

Answer 6

Sub Macro4()
' Macro4 Macro
'
    ActiveWorkbook.SaveAs Filename:= _
        "C:\Book1.csv", FileFormat:=xlCSV, _
        CreateBackup:=False
End Sub录制了这样一个宏，然后用VB打开相应xls文件，运行这个宏就行啦

Answer 7

 这个方法我知道!难道生成csv再改扩展名吗?

Answer 8

Book1.csv  把这个改成 book1.TXT 不就行了？？至于用VB打开excel，再控制它运行一个宏，那是另外一个问题了其实还可以用数据库的方式读取xls的单元格格的内容，然后再自己按照需要写入txt，但你还是掌握了上面的方法先啦 

Answer 9

这方法不行,感觉是取巧我已经解决啦!是excel读出来再写入文本

Answer 10

呵呵 什么叫取巧呢，我试过明明可以啊，其实扩展名跟它里面是什么格式没有必然关系的？？  还有，你说不行，要说说为什么不行才好解决啊。
读取xls之后再写入  ，如果你会那就好啦，那就没什么搞不定的了