|
pykacha
初级用户
积分 156
发帖 73
注册 2008-5-9
状态 离线
|
『楼 主』:
批处理命令可不可以直接用echo向xls文件写入数据？
问题描述：
我们可以用"echo %变量1% %变量2% >1.txt"命令向txt文件写入数据,为了方便数据的处理,我想直接把数据写入电子表格xls文件.
请问有没有办法做到?
|
为自己是中国人而倍感骄傲 |
|
 2008-5-13 18:09 |
|
|
bat-zw
金牌会员
永远的学习者
积分 3105
发帖 1276
注册 2008-3-8
状态 离线
|
|
|
2008-5-13 18:19 |
|
|
slore
铂金会员
积分 5212
发帖 2478
注册 2007-2-8
状态 离线
|
『第
3 楼』:
I will tell you that vbs can do it.
|
|
|
2008-5-13 18:24 |
|
|
pykacha
初级用户
积分 156
发帖 73
注册 2008-5-9
状态 离线
|
『第
4 楼』:
| Quote: | Originally posted by slore at 2008-5-13 06:24 PM:
I will tell you that vbs can do it. |
|
关于VBS我也上网看过些文章,但还不会编写代码,前辈可不可以帮忙写个代码?
先谢谢!
|
为自己是中国人而倍感骄傲 |
|
|
2008-5-13 18:38 |
|
|
pooronce
中级用户
积分 484
发帖 250
注册 2007-6-5
状态 离线
|
『第
5 楼』:
标准的xls有特殊格式，直接是不行的
不过你可以直接用echo配合数据及tab分割符来达到效果，文件名定义成xls就行了
|
|
|
2008-5-13 18:54 |
|
|
slore
铂金会员
积分 5212
发帖 2478
注册 2007-2-8
状态 离线
|
『第
6 楼』:
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
|
|
|
2008-5-13 19:00 |
|
|
pykacha
初级用户
积分 156
发帖 73
注册 2008-5-9
状态 离线
|
『第
7 楼』:
slore前辈实现了真正意义的xls文件，可惜没自动保存。如果可以用bat文件把变量传递给它，调用它来保存为xls文件就好了。
pooronce前辈这种方法如果数据过多的时候再写入时会不会很慢？
|
为自己是中国人而倍感骄傲 |
|
|
2008-5-14 16:28 |
|
|
slore
铂金会员
积分 5212
发帖 2478
注册 2007-2-8
状态 离线
|
『第
8 楼』:
有自动保存，我只是为了让你看见=。=没有写……
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对象
或者找找例子
|
|
|
2008-5-14 16:44 |
|
|
pooronce
中级用户
积分 484
发帖 250
注册 2007-6-5
状态 离线
|
『第
9 楼』:
汗……不要用那样的称呼，受不起
我说的相当于你直接写入到一个文本格式文件里，只是设定它的后辍为xls罢了，所以理论上说只会比标准xls快。
如果是大量数据需要处理的话，可以考虑学习使用gawk
|
|
|
2008-5-14 17:11 |
|
|
zh159
金牌会员
积分 3687
发帖 1467
注册 2005-8-8
状态 离线
|
『第
10 楼』:
还有另外一个方法：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 ]
|
 |
|
|
2008-5-14 17:39 |
|
|
slore
铂金会员
积分 5212
发帖 2478
注册 2007-2-8
状态 离线
|
『第
11 楼』:
文本（以制表符分隔）(*.txt) (Windows)
文本 (Macintosh)
文本（OS/2 或 MS-DOS）
CSV（以逗号分隔）(*.csv) (Windows)
CSV (Macintosh)
CSV（OS/2 或 MS-DOS）
如果需要将工作簿保存为以制表符分隔或以逗号分隔的文本文件，以便在另一个操作系统中使用，请选择合适的转换器以确保制表符、分行符以及其他符号正确的转换。
只保存活动工作表。
2个是一样的道理……
一个是TAB间隔，一个是逗号间隔而已。
txt的把你的逗号改成TAB，也支持公式
|
|
|
2008-5-14 17:51 |
|
|
cnLiou
新手上路
积分 16
发帖 6
注册 2008-5-10
状态 离线
|
『第
12 楼』:
与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
|
|
|
2008-5-14 19:16 |
|
|
pykacha
初级用户
积分 156
发帖 73
注册 2008-5-9
状态 离线
|
『第
13 楼』:
不停地学习中，谢谢大家
|
为自己是中国人而倍感骄傲 |
|
|
2008-5-21 17:53 |
|
