如何用VB实现EXCEL转换成固定长度的TXT文档

2025-04-25 04:06:35
推荐回答(2个)
回答1:

不知道你会不会用notepad++,用里面的替换功能把所有数字之间的空格替换成回车,即 " "(空格)替换成\r\n (回车)

如果用ultraEdit 那就把空格替换成 ^p

替换完后,你把所有内容拷贝到excel的A列,接下来就要用公式转换了。

在B1输入公式: =INDIRECT("a"&ROW()*4-3)*100000+INDIRECT("a"&ROW()*4-2)*1000+INDIRECT("a"&ROW()*4-1)*10+INDIRECT("a"&ROW()*4)/10

然后把B1往下拉并且把B列设置成“数值”保留一位小数就完成了

回答2:

用vb打开EXCEL
另存为 *prn 格式文件 在把扩展名改为txt就行了

自己下代码的话也可以实现 就是有点麻烦