作者:乔山办公网日期:
返回目录:word文档
1,录制宏
2,替换法,chr(13)就是回车符。
这事替换就搞定了,为什么要用VBA??
用字符替换的方法先删除换行符再导出zd到TXT,比如要删除A1单元格的换行符内,代码如下:
Range("A1").Replace Chr(10), ""
如果对整个活动工容作表去掉换行符:
ActiveSheet.Cells.Replace Chr(10), ""
Open "C:\aa.txt" For Binary As #1 '¸ÄдÄÚÈÝ
Put #1, , "1"
Close #1
用replace就行,换行符是chr(10)