标题: 如何用批处理将TXT文件直接转换成XLS文件 [打印本页]

---

作者: xycoordinate     时间: 2007-2-24 00:29    标题: 如何用批处理将TXT文件直接转换成XLS文件

如何用批处理将TXT文件直接转换成XLS文件

report.txt

Quote:

1 13  45 0 4500  15615 2 13  45 0 4500  15600 3 26  255 0 25500  15601 4 18  81 0 8100  15602 5 29  188 0 18800  15605 6 25  150 0 15000  15606 7 84  333 12 33900  15609 8 20  105 1 10550  15610 9 26  128 0 12800  15611 10 14  149 0 14900  15612 11 5  33 0 3300  15613 12 0  0  0 0  15616 13 48  190 16 19800  15617 14 321   1702 29 171650

[ Last edited by xycoordinate on 2007-2-23 at 11:34 AM ]

---

作者: slore     时间: 2007-2-24 00:47
xls
你用记事本打开是什么格式？

---

作者: anqing     时间: 2007-2-24 01:32
txt中的数字，能准确给xls文件吗？

---

作者: slore     时间: 2007-2-24 01:34
格式有规律当然可以。

---

作者: zh159     时间: 2007-2-24 01:34
现在没时间写代码，给你一个思路：

先将双空格替换为单空格，再将单空格替换为{TAB}+单空格（{TAB}：制表符）

然后直接用 Excel 打开该 TXT 文件

---

作者: slore     时间: 2007-2-24 01:53
看了本来有的xls文档，貌似不是纯文本样子……

那就5楼的模拟输入咯。。。

---

作者: slore     时间: 2007-2-24 02:40
脚本可以引用这个对象Excel.Application

---

作者: vkill     时间: 2007-2-24 02:50
这个不可以吧?xls文件用记事本打开是乱码的

---

作者: amao     时间: 2007-2-24 03:20
sed "s/^[ \t]*//;s/[ \t]\+/\t/g" report.txt> result.xls

sed的下载和使用请用"sed"搜索本论坛

[ Last edited by amao on 2007-2-24 at 03:22 AM ]

---

作者: NaturalJ0     时间: 2007-2-24 03:27
如果隔着空格或TAB或逗号，倒是可以直接用EXCEL打开TXT文件，EXCEL会问你如何分隔。
PS：按TAB键分隔好，复制到剪贴板，再打开EXCEL粘贴，倒也可行，如果这样的话要用VBS了。

---

作者: zh159     时间: 2007-2-24 03:56
生成的“test.xls”可以直接用 Excel 打开
{TAB}：键盘TAB制表符

PS：你的数据最后一行“14 321   1702 29 171650   ”是不是有问题，少了第三个数据？

[ Last edited by zh159 on 2007-2-23 at 06:16 PM ]

---

作者: xycoordinate     时间: 2007-2-24 09:38

Quote:

Originally posted by zh159 at 2007-2-23 02:56 PM: 生成的“test.xls”可以直接用 Excel 打开 @echo off setlocal EnableDelayedExpansion cd.>test.xls for /f "delims=" %%n in (test.txt) do (   set "str=%%n"   set "str=!str:  = !"   set "str=!str: ={TAB} !" echo !str! >>test.xls echo !str! ) pause 先将双空格替换为单空格，再将单空格替换为{TAB}+单空格（{TAB}：制表符）

谢谢!!!
NNNNNN!!!!!!!!!!!!!

还有:

Quote:

cd.>test.xls set "str=!str:  = !" set "str=!str: ={TAB} !"

意思不太明白???
是这个吗?

Quote:

set /? 环境变量替换已如下增强:     %PATH:str1=str2% 会扩展 PATH 环境变量，用 "str2" 代替扩展结果中的每个 "str1"。 要有效地从扩展结果中删除所有的 "str1"，"str2" 可以是空的。 "str1" 可以以星号打头；在这种情况下，"str1" 会从扩展结果的 开始到 str1 剩余部分第一次出现的地方，都一直保持相配。

我直接用tab分割列就OK了!!!!


20070131.txt如下格式,直接更改扩展名为xls,就能如我愿了!!!
1        13         45        0        4500         15615
2        13         45        0        4500         15600
3        26         255        0        25500         15601
4        18         81        0        8100         15602
5        29         188        0        18800         15605
6        25         150        0        15000         15606
7        84         333        12        33900         15609
8        20         105        1        10550         15610
9        26         128        0        12800         15611
10        14         149        0        14900         15612
11        5         33        0        3300         15613
12        0         0         0        0         15616
13        48         190        16        19800         15617
14        321          1702        29        171650

[ Last edited by xycoordinate on 2007-2-23 at 10:53 PM ]

---

作者: vkill     时间: 2007-2-24 09:39
反过来那?

---

作者: chainliq     时间: 2007-2-24 10:46
呵呵，这样也简单哈`````

@echo off
type report.txt echo >>report.xls

---

作者: xycoordinate     时间: 2007-2-24 11:43

Quote:

Originally posted by chainliq at 2007-2-23 09:46 PM: 呵呵，这样也简单哈````` @echo off type report.txt echo >>report.xls

Quote:

F:\>type report.txt echo >>report.xls report.txt 系统找不到指定的文件。 处理: echo 时出错。

为何会报错?????

report.xls倒是生成了,但是格式不对!!!

---

作者: xycoordinate     时间: 2007-2-24 12:13

Quote:

Originally posted by amao at 2007-2-23 02:20 PM: sed "s/^[ \t]*//;s/[ \t]\+/\t/g" report.txt> result.xls sed的下载和使用请用"sed"搜索本论坛 [ Last edited by amao on 2007-2-24 at 03:22 AM ]

厉害!!!

---

作者: zh159     时间: 2007-2-24 14:37
cd.>test.xls
建立一个空的test.xls文件

set "str=!str:  = !"
（两个空格替换为一个空格）

set "str=!str: ={TAB} !"
（一个空格替换为一个制表符+一个空格，因为论坛不能正确显示制表符，所以用{TAB}代替说明，实际是在{TAB}位置按一下制表符键）