raobinhsh 发表于 2006-11-25 22:32:00

懂excel和vba的才来

<font style="font-size: 10pt;" id="text1" face="宋体,verdana, arial, helvetica">通过一个文本文件产生很多文本文件<br>
说明:<br>
一 文件部分<br>
1 1.txt为源文件,是文件本来就有的,<br>
是产生其他文件的基础<br>
2 1.txt由xls文件格式复制粘贴在记事本中而形成,<br>
每列分隔符为“TAB”键<br>
3 1.txt文件中每隔若干行有一列空行,或该行第一个字符空缺,<br>
即没有“W1”,“W2”,<br>
这样的字符,这表示其他文件的分隔符,程序每遇到这种情况,<br>
将重新产生一个文件<br>
4 源文件文件名不一定是1.txt,也可能是其他名字的文本文件<br>
5 所产生的新的一系列文件文件名由产生这个文件的数据中第一<br>
列的第一行字符和最后一行字符组成<br>
以及这组数据在源文件中的排列顺序<br>
6示例<br>
   以1-w1w162txt为例:<br>
6.1 在1.txt中从W1开始到W162结束,下一行没有带W的字符,<br>
    认为这些数据应产生一个文本文件<br>
6.2 由于这些数据在源文件产生的文件中排列第一,所以文件名前带有“1-”字样,<br>
    由于这些数据从W1开始到W162结束,所以整个文件名为“1-W1W162.&#9;txt<br>
<br>
<br>
二 新文件产生规则<br>
   以1-w1w162txt为例:<br>
1 文件的第一行数据 (0 159 159 0 -1.172 "w" 1)<br>
“(0”    为固定字符输入,<br>
    第一个“159”    表示源文件中这组数据第三列和第四列数据的行数<br>
    第二个“159”    表示源文件中这组数据第五列、第六列、第七列和<br>
       第八列数据的行数<br>
   第二个“159”后的“0”为固定字符输入,<br>
   “-1.172”为源文件中这组数据第二列的第一行的数据<br>
    “w”   为固定字符输入 <br>
    “1”   为源文件中这组数据第一列的第一行的数据去掉“w”后的数据<br>
    “)”为固定字符输入 <br>
<br>
2文件除去第一行数据后的第一个“159”行数据<br>
    (0.0 2.882):括号内数据为源文件中这组数据每行第三列和第四列字符<br>
   字符之间分隔符为空格,字符与括号之间无空格<br>
   其他每行数据也一样是这个意义<br>
<br>
<br>
3文件除去第一行数据后的第二个“159”行数据<br>
   (300 1.1 500 nil)<br>
   (330 0.9 700 -0.2)<br>
   括号内数据为源文件中这组数据每行第五列、第六列、第七列和第八列数据字符<br>
   字符之间分隔符为空格,字符与括号之间无空格<br>
   其他每行数据也一样是这个意义<br>
   如果第八列数据为0,则改为“nil"<br>
具体请见附件</font>

cuseasky 发表于 2006-11-26 12:00:00

请联系 <A href="mailto:itcad@sina.com" target="_blank" >itcad@sina.com</A>
页: [1]
查看完整版本: 懂excel和vba的才来