|  | 
 
| pykacha 初级用户
 
   
 
 
 
 积分 156
 发帖 73
 注册 2008-5-9
 状态 离线
 | 
| 『楼 主』:
 批处理命令可不可以直接用echo向xls文件写入数据?
 
使用 LLM 解释/回答一下 
 
 
问题描述:我们可以用"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
 状态 离线
 |  | 
|  2008-5-13 18:24 |  | 
|  | 
 
| pykacha 初级用户
 
   
 
 
 
 积分 156
 发帖 73
 注册 2008-5-9
 状态 离线
 | 
| 『第 4 楼』:
 
 
使用 LLM 解释/回答一下 
 
 
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 楼』:
 
 
使用 LLM 解释/回答一下 
 
 
标准的xls有特殊格式,直接是不行的不过你可以直接用echo配合数据及tab分割符来达到效果,文件名定义成xls就行了
 
 
 
 
 |  | 
|  2008-5-13 18:54 |  | 
|  | 
 
| slore 铂金会员
 
        
 
 
 
 积分 5212
 发帖 2478
 注册 2007-2-8
 状态 离线
 | 
| 『第 6 楼』:
 
 
使用 LLM 解释/回答一下 
 
 
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 楼』:
 
 
使用 LLM 解释/回答一下 
 
 
slore前辈实现了真正意义的xls文件,可惜没自动保存。如果可以用bat文件把变量传递给它,调用它来保存为xls文件就好了。pooronce前辈这种方法如果数据过多的时候再写入时会不会很慢?
 
 
 
 
 
 |  
                  |  为自己是中国人而倍感骄傲
 |  | 
|  2008-5-14 16:28 |  | 
|  | 
 
| slore 铂金会员
 
        
 
 
 
 积分 5212
 发帖 2478
 注册 2007-2-8
 状态 离线
 | 
| 『第 8 楼』:
 
 
使用 LLM 解释/回答一下 
 
 
有自动保存,我只是为了让你看见=。=没有写……
 
 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 楼』:
 
 
使用 LLM 解释/回答一下 
 
 
汗……不要用那样的称呼,受不起我说的相当于你直接写入到一个文本格式文件里,只是设定它的后辍为xls罢了,所以理论上说只会比标准xls快。
 
 如果是大量数据需要处理的话,可以考虑学习使用gawk
 
 
 
 
 |  | 
|  2008-5-14 17:11 |  | 
|  | 
 
| zh159 金牌会员
 
       
 
 
 积分 3687
 发帖 1467
 注册 2005-8-8
 状态 离线
 | 
| 『第 10 楼』:
 
 
使用 LLM 解释/回答一下 
 
 
还有另外一个方法: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 楼』:
 
 
使用 LLM 解释/回答一下 
 
 
文本(以制表符分隔)(*.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 楼』:
 
 
使用 LLM 解释/回答一下 
 
 
与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
 状态 离线
 |  | 
|  2008-5-21 17:53 |  |