[问题求助] 怎样用VBS或BAT导出EXCEL表中的一部分数据为TXT

loger

怎样用vbs或bat导出EXCEL表中的一部分数据为TXT，求救各位大侠，小弟先谢过了。。。

例如，EXCEL表中有如下数据：

姓名        产品        数量
刘起涯        小灵通        45
周月        小灵通        34
向文章        电话        45
周月        小灵通        95
区同雨        电话        55
顾思明        电话        17
李东        小灵通        12

我想用批处理导出表中的第3列的数量部分到一个文本文件(.TXT)中，应该怎么作呀？谢谢!
这个问题已经愁了好多天了，一直也没找到答案
期盼高人的出现，等待中。。。

[ 本帖最后由 loger 于 2009-4-27 14:48 编辑 ]

Batcher

你需要导出EXCEL表中的哪一部分数据？

Batcher

请把详细需求更新到顶楼

batman

'获取excel表sheet(1)6-10行的第三列数据到文本
dim path,strexcel,counter
path="E:\批处理\"
set objfos=createobject("scripting.filesystemobject")
set objtxt=objfos.opentextfile(path&"new.txt",2,true)
set objexcel=createobject("excel.application")
set objworks=objexcel.workbooks.open(path&"test.xls")
set objsheets=objworks.sheets(1)
for counter=6 to 10
     strexcel=strexcel&vbcrlf&objsheets.cells(counter,3).value
next
objtxt.write strexcel
objtxt.close
objexcel.quit
set objtxt=nothing
set objfso=nothing
set objsheets=nothing
set objworks=nothing
set objexcel=nothing
复制代码

[ 本帖最后由 batman 于 2009-4-27 18:10 编辑 ]

batman

楼主还可以参照此贴：
http://www.bathome.net/thread-4028-1-1.html

shfxnqby

如果能把该文件另存为csv文件，再用记事本打开...

hnldwhm52

xiexiexie!!!!