[已解决]如何将excel单元格中的换行符替换掉并导出到txt
本帖最后由 navy 于 2012-10-9 20:53 编辑各位高人,我在navy.xls第一个单元格写了两行内容(用Enter换的行),但是将第一个单元格的内容读取并写入到txt文件后发现有小黑块,希望高人直接修改下面的代码,拜谢了!!
#include <Excel.au3>
#include <Array.au3>
#include <File.au3>
Local $xlsfile = @ScriptDir & "\navy.xls";navy.xls 第一个单元格里有两行内容,用回车换的行
Local $oExcel = _ExcelBookOpen($xlsfile,0)
$oTxt = FileOpen("navy.txt", 10)
$sCellValue = _ExcelReadCell($oExcel,1,1);如果直接读取第一个单元格的内容并写入txt文件,txt里显示有小黑块
$sCellValue = StringRegExpReplace($sCellValue,"\r", "");请指点一下,这个地方如何将回车替换掉,谢谢
FileWrite($oTxt,$sCellValue)
FileClose($oTxt)
_ExcelBookClose($oExcel) $sCellValue = StringRegExpReplace($sCellValue,"\n", "") 感谢 lpxx 的答复,问题已解决! 为什么我执行这段代码提示这个错误啊?
+>执行环境:
+> CPU构架: X64
+> 系统构架: X64
+> 系统语言: 0804
+> 键盘布局: 00000804
+> 内存总量: 4022MB
+> 内存剩余: 2003MB
+> 操作系统: WIN_81
+> AU3版本: 3.3.9.19
+> ============================================
>运行 AU3Check (3.3.9.19)开始目录:D:\autoit3
"D:\autoit3\Include\Array.au3"(313,1) : error: 表达式错误
<
^
"D:\autoit3\Include\Array.au3"(313,14) : error: 未使用'With'访问对象方法或者属性.
<<<<<<< .mine
~~~~~~~~~~~~~^
"D:\autoit3\Include\Array.au3"(315,1) : error: 表达式错误
==
^
"D:\autoit3\Include\Array.au3"(317,1) : error: 表达式错误
>
^
"D:\autoit3\Include\Array.au3"(317,15) : error: 未使用'With'访问对象方法或者属性.
>>>>>>> .r1038
~~~~~~~~~~~~~~^
C:\Users\Administrator\Desktop\AU3脚本.au3 - 5 错误, 0 警告
!>08:27:40 AU3Check 完成. 按下 F4 跳转到下一次错误.:2
+>08:27:40 ACNWrapper 完成..
页:
[1]