中国DOS联盟

现有一EXCEL表格，名为All.xls
内容为
1 6 9 4
a c e d
一 二 三 四
等等。。。

要求如下：
1、把每一行导出为一个TXT文件
2、每一行的每一格都加相同的注释，并换行
如：

1.txt的内容为：
第一列：1
第二个：6
第三格：9
最后个：4

2.txt的内容为：
第一列：a
第二个：c
第三格：e
最后个：d


3.txt的内容为：
第一列：一
第二个：二
第三格：三
最后个：四

如果说EXCEL表不好用批处理导出的话，可不可以我手动先把XLS内容复制到TXT里，以每个TABLE为变量来导出呢？
小弟太菜，搜索了半天找不到门道，只能求助，谢谢大大们了。。。

Last edited by flybird2020 on 2007-8-21 at 11:04 AM ]

如果说EXCEL表不好用批处理导出的话，可不可以我手动先把XLS内容复制到TXT里，以每个TABLE为变量来导出呢？

@echo off&&setlocal EnableDelayedExpansion

Set Num=1

for /f "tokens=1,2,3,4 delims=	" %%a in (in.txt) do (

echo %%a>>!Num!.txt

echo %%b>>!Num!.txt

echo %%c>>!Num!.txt

echo %%d>>!Num!.txt

Set /a Num+=1

)

pause

Originally posted by slore at 2007-8-20 10:50 AM:
如果说EXCEL表不好用批处理导出的话，可不可以我手动先把XLS内容复制到TXT里，以每个TABLE为变量来导出呢？

@echo off&&setlocal EnableDelayedEx ...

谢谢slore兄的解答
那么我现在还有两个问题
1、每一条数据加一个“注释”，如第一条加“第一列”，第二条加“第二个”，这个能不能加上去？

第一列：1

第二个：6

第三格：9

最后个：4

2、可否用固定某一列做为文件名？
如在上例中，用6、C、二，做为文件的命名(6.txt,C.txt,二.txt)

表达的不是很清楚，希望slore兄能不吝赐教，谢谢了

Last edited by flybird2020 on 2007-8-20 at 11:12 AM ]

用vba 好了

@echo off&&setlocal EnableDelayedExpansion
for /f "tokens=1,2,3,4 delims= " %%a in (in.txt) do (
echo 第一列：%%a>>%%b.txt
echo 第二个：%%b>>%%b.txt
echo 第三格：%%c>>%%b.txt
echo 最后个：%%d>>%%b.txt
)
pause

Originally posted by slore at 2007-8-20 11:41 PM:
@echo off&&setlocal EnableDelayedExpansion
for /f "tokens=1,2,3,4 delims= " %%a in (in.txt) do (
echo 第一列：%%a>>%%b.txt
echo 第二个：%%b>>%%b.txt
...

slore兄，太厉害了
我还有很长的路要走
希望能在您身上学到更多
谢谢
谢谢