调试出了错误，excel不能写入值，程序自动退出了【已解决】

xwt620 · 发表于 2011-6-21 16:02:04

本帖最后由 xwt620 于 2011-6-21 21:47 编辑

0038: 0-0: #include <Excel.au3>
0040: 0-0: $oExcel = _ExcelBookOpen($sFilePath2)
0041: 0-0: If @error = 1 Then
0050: 0-0: $j=1
0051: 0-0: $oA1=_ExcelReadCell($oExcel, $j, 1)
0052: 0-0: While $oA1 <> ""
0053: 0-0: $j+=1
0054: 0-0: $oA1=_ExcelReadCell($oExcel, $j, 1)
0055: 0-0: wend
0057: 0-0: _ExcelWriteCell($oExcel, $j, 1, $A1)
C:\Documents and Settings\Administrator\??\xw\3.3.6.1-2\Include\Excel.au3 (451) : ==> ??????(?????).:
$oExcel.Activesheet.Cells($sRangeOrRow, $iColumn).Value = $sValue
$oExcel.Activesheet.Cells($sRangeOrRow, $iColumn)^ ERROR
上面是调试出错的信息。
$j是我判断A列中的空行得到的值（也就是行号），$A1是编号。
从上面错误分析得出，可能是没有包含excel.au3这个文件，可是在这段程序开头，我包含了一个excel.au3,并且先有一个excel的文件被打开并读取了一些信息(如$A1)，然后再写进第二个excel文件中，可在写第二个文件时出错了。
各位大大，这是什么问题啊，这也是我头一次写excel程序，居然有这个么多问题。。。

kevinch · 发表于 2011-6-21 20:03:41

代码不全，看不懂。

auhj887 · 发表于 2011-6-21 20:35:46

xwt620 · 发表于 2011-6-21 21:46:28

还是自己解决了

原来出错就错在 _ExcelWriteCell($oExcel, $j, 1, $A1)的$A1上了，
看看帮助文件
_ExcelWriteCell($oExcel, $sValue, $sRangeOrRow [, $iColumn = 1])
我写入的值放到最后去了，应该放到第二个参数才对。。

txbihai · 发表于 2011-9-20 22:21:23

正需要excel读写的

		自动登录	找回密码
密码			加入

[AU3基础] 调试出了错误，excel不能写入值，程序自动退出了【已解决】