中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --

联盟域名:www.cn-dos.net 论坛域名:www.cn-dos.net/forum
DOS,代表着自由开放与发展,我们努力起来,学习FreeDOS和Linux的自由开放与GNU精神,共同创造和发展美好的自由与GNU GPL世界吧!

中国DOS联盟论坛
现在时间是 2026-08-08 18:04
中国DOS联盟论坛 » DOS批处理 & 脚本技术(批处理室) » 批处理命令可不可以直接用echo向xls文件写入数据? 查看 1,498 回复 12
楼 主 批处理命令可不可以直接用echo向xls文件写入数据? 发表于 2008-05-13 18:09 ·  中国 广东 广州 番禺区 电信
初级用户
★★
积分 156
发帖 73
注册 2008-05-09 10:40
18年会员
UID 118210
性别 男
状态 离线
问题描述:
我们可以用"echo %变量1% %变量2% >1.txt"命令向txt文件写入数据,为了方便数据的处理,我想直接把数据写入电子表格xls文件.
请问有没有办法做到?
为自己是中国人而倍感骄傲
2 发表于 2008-05-13 18:19 ·  中国 湖南 株洲 电信
金牌会员
★★★★
永远的学习者
积分 3,105
发帖 1,276
注册 2008-03-08 13:00
18年会员
UID 112398
性别 男
状态 离线
I will tell you that bat have no idea
批处理之家新域名:www.bathome.net
3 发表于 2008-05-13 18:24 ·  中国 陕西 西安 电信
铂金会员
★★★★
积分 5,212
发帖 2,478
注册 2007-02-08 23:39
19年会员
UID 79003
性别 男
状态 离线
I will tell you that vbs can do it.
4 发表于 2008-05-13 18:38 ·  中国 广东 广州 番禺区 电信
初级用户
★★
积分 156
发帖 73
注册 2008-05-09 10:40
18年会员
UID 118210
性别 男
状态 离线
Originally posted by slore at 2008-5-13 06:24 PM:
I will tell you that vbs can do it.


关于VBS我也上网看过些文章,但还不会编写代码,前辈可不可以帮忙写个代码?
先谢谢!
为自己是中国人而倍感骄傲
5 发表于 2008-05-13 18:54 ·  中国 上海 鹏博士宽带
中级用户
★★
积分 484
发帖 250
注册 2007-06-05 23:33
19年会员
UID 90372
性别 男
状态 离线
标准的xls有特殊格式,直接是不行的
不过你可以直接用echo配合数据及tab分割符来达到效果,文件名定义成xls就行了
6 发表于 2008-05-13 19:00 ·  中国 陕西 西安 电信
铂金会员
★★★★
积分 5,212
发帖 2,478
注册 2007-02-08 23:39
19年会员
UID 79003
性别 男
状态 离线
Set objExcel = CreateObject("Excel.Application")
objExcel.Visible = True
Set
objWb = objExcel.Workbooks.Add
Set objWs = objWb.Worksheets.Add
objExcel.Cells(1, 1).Value = "slore"

Set objExcel = Nothing
7 发表于 2008-05-14 16:28 ·  中国 广东 广州 番禺区 电信
初级用户
★★
积分 156
发帖 73
注册 2008-05-09 10:40
18年会员
UID 118210
性别 男
状态 离线
slore前辈实现了真正意义的xls文件,可惜没自动保存。如果可以用bat文件把变量传递给它,调用它来保存为xls文件就好了。
pooronce前辈这种方法如果数据过多的时候再写入时会不会很慢?
为自己是中国人而倍感骄傲
8 发表于 2008-05-14 16:44 ·  中国 陕西 西安 电信
铂金会员
★★★★
积分 5,212
发帖 2,478
注册 2007-02-08 23:39
19年会员
UID 79003
性别 男
状态 离线
有自动保存,我只是为了让你看见=。=没有写……


Set objExcel = CreateObject("Excel.Application")
'objExcel.Visible = True 显示对象
'objExcel.DisplayAlerts = FALSE 覆盖方式保存
Set objWb = objExcel.Workbooks.Add
Set objWs = objWb.Worksheets.Add
objExcel.Cells(1, 1).Value = "Slore"
objWb.SaveAs("C:\Test.xls")
objExcel.Quit
Set objExcel = Nothing

参数当然有……自己可以查看VBS的Argument对象
或者找找例子
9 发表于 2008-05-14 17:11 ·  中国 上海 电信
中级用户
★★
积分 484
发帖 250
注册 2007-06-05 23:33
19年会员
UID 90372
性别 男
状态 离线
汗……不要用那样的称呼,受不起
我说的相当于你直接写入到一个文本格式文件里,只是设定它的后辍为xls罢了,所以理论上说只会比标准xls快。

如果是大量数据需要处理的话,可以考虑学习使用gawk
10 发表于 2008-05-14 17:39 ·  中国 广西 玉林 电信
金牌会员
★★★★
积分 3,687
发帖 1,467
注册 2005-08-08 12:00
21年会员
UID 44210
状态 离线
还有另外一个方法:echo后缀为csv文件,数据采用“,”分号(英文分号)分割,可以直接用Excel打开,Excel处理后再存为xls文件

PS:简单测试发现支持部分公式:
csv
1,2,3,=A1+B1+C1


[ Last edited by zh159 on 2008-5-14 at 05:41 PM ]
11 发表于 2008-05-14 17:51 ·  中国 陕西 西安 电信
铂金会员
★★★★
积分 5,212
发帖 2,478
注册 2007-02-08 23:39
19年会员
UID 79003
性别 男
状态 离线
文本(以制表符分隔)(*.txt) (Windows)
文本 (Macintosh)
文本(OS/2 或 MS-DOS)
CSV(以逗号分隔)(*.csv) (Windows)
CSV (Macintosh)
CSV(OS/2 或 MS-DOS)

如果需要将工作簿保存为以制表符分隔或以逗号分隔的文本文件,以便在另一个操作系统中使用,请选择合适的转换器以确保制表符、分行符以及其他符号正确的转换。
只保存活动工作表。


2个是一样的道理……

一个是TAB间隔,一个是逗号间隔而已。

txt的把你的逗号改成TAB,也支持公式
12 发表于 2008-05-14 19:16 ·  尼日利亚
新手上路
积分 16
发帖 6
注册 2008-05-10 03:56
18年会员
UID 118304
性别 男
状态 离线
与html的格式一致即可. 如下可供考:

@Echo Off

Echo ^<Table border="1"^>>Excel.xls
REM Title
Echo ^<TR^>>>Excel.xls
Echo ^<TD^>Sn^</TD^>>>Excel.xls
Echo ^<TD^>Name^</TD^>>>Excel.xls
Echo ^<TD^>Age^</TD^>>>Excel.xls
Echo ^</TR^>>>Excel.xls
REM Content
Echo ^<TR^>>>Excel.xls
Echo ^<TD^>1^</TD^>>>Excel.xls
Echo ^<TD^>Liou^</TD^>>>Excel.xls
Echo ^<TD^>25^</TD^>>>Excel.xls
Echo ^</TR^>>>Excel.xls
Echo ^<TR^>>>Excel.xls
Echo ^<TD^>2^</TD^>>>Excel.xls
Echo ^<TD^>Tony^</TD^>>>Excel.xls
Echo ^<TD^>26^</TD^>>>Excel.xls
Echo ^</TR^>>>Excel.xls
Echo ^<TR^>>>Excel.xls
Echo ^<TD^>3^</TD^>>>Excel.xls
Echo ^<TD^>Eric^</TD^>>>Excel.xls
Echo ^<TD^>27^</TD^>>>Excel.xls
Echo ^</TR^>>>Excel.xls
Echo ^</Table^>>>Excel.xls
13 发表于 2008-05-21 17:53 ·  中国 广东 广州 番禺区 电信
初级用户
★★
积分 156
发帖 73
注册 2008-05-09 10:40
18年会员
UID 118210
性别 男
状态 离线
不停地学习中,谢谢大家
为自己是中国人而倍感骄傲
论坛跳转: