excel用vba自动提取多个txt文件中指定位置多个字符到excel指定单元格中 50

运行excel的宏后，会打开一个文件夹，读取里面的所有txt文件，提取txt中的指定位置的字符（有纯数字字符以及混合字符），到指定单元格，比如，忽略所有的空格情况下1、第... 运行excel的宏后，会打开一个文件夹，读取里面的所有txt文件，提取txt中的指定位置的字符（有纯数字字符以及混合字符），到指定单元格，比如，忽略所有的空格情况下
1、第一行的第2-3个字符放到A2单元格，
3、第二行的倒数第5-7个字符到C2单元格，
4、第三行的ABCDEF后面的第3-6个字符放到E2单元格
5、某一行是HIJKLM开头的，该行的上一行的倒数第3-6个字符放到G2单元格
6、某一行是提取之后的A2&C2中的数据开头的，第6-11个字符放到K2单元格
7、一个txt一行，多个txt多行提取
要忽略空格和空行，因为空格和空行太多了
具体是想提取第一行的PLAN 9828，ZYTX,ZHCC,行数固定；第四行的011274,行数固定；第六行的ZSJN和最后四位2756，行数固定；第十行的0052，行数不固定，只能确定下一行是ELEV开头；第12行的IDULA..AKOMA..P385..WXI..GULEK，行数也不固定，只能知道开头的8位字符是第一行提取出来的
txt在 http://pan.baidu.com/s/1hspIvUs
这个txt文本是简化出来的，怎么写这个宏的代码呢？
然后可以每一行都注释下吗?万分感谢展开