Question

AUTOIT3 如何读取XLS文件某列的数据，然后在别的窗口中按一次键顺序粘贴一个值

AUTOIT3 如何读取XLS文件某列的数据，然后在别的窗口中按一次键顺序粘贴一个值
如用以下代码打开文件后怎么按顺续读取其中一列的数，然后在别的窗口中按一个键，他就粘贴出一个值来。
#include <Excel.au3>
#include <Array.au3>

$sFilePath1 = "d:\1.xls" ;文件所在路径
$oExcel = _ExcelBookOpen($sFilePath1) ;打开这个EXCEL文件

If @error = 1 Then
MsgBox(0, "错误!", "无法创建对象!")
Exit
ElseIf @error = 2 Then
MsgBox(0, "错误!", "文件不存在!")
Exit
EndIf
#include <Excel.au3>
#include <Array.au3>
#include <Misc.au3>

$sFilePath1 = "d:\1.xls" ;文件所在路径
$oExcel = _ExcelBookOpen($sFilePath1) ;打开这个EXCEL文件

If @error = 1 Then
MsgBox(0, "错误!", "无法创建对象!")
Exit
ElseIf @error = 2 Then
MsgBox(0, "错误!", "文件不存在!")
Exit
EndIf

For $ix = 1 To 100 Step +1
;读取表格中的某1列数据至数组中
这里如何写？
$aValues ;_ArrayDisplay($aValues,"ddddd")
;切换到另外的程序,此处示例为文本编辑器
WinActivate("[CLASS:Notepad]")
WinWaitActive("[CLASS:Notepad]")
$dll = DllOpen("user32.dll")
While 1
Sleep ( 250 )
If _IsPressed("71", $dll) Then 我想设成按F2一次粘贴一个出来，但因为才学的，不知道哪错了
Send($aValues[0])
Next
ExitLoop
EndIf
WEnd
DllClose($dll)

Answer 1

$var = $oExcel.sheet(1).cells(1.1)//读取第一个单元格数据
$oExcel.sheet(1).cells(2.1) = $var //把读取的值填进excel

$rowcount = ActiveSheet.UsedRange.Rows.Count //excel的行数
$Columnscount =ActiveSheet.UsedRange.Columns.Count //excel列数
----------------------------------------
核心就是这些,先读取excel的行数,然后循环读取每个单元格的值,就可以取得一列的值,然后按你的需要再赋值就行了
----------------------------------------
例如:

$ix = ActiveSheet.UsedRange.Rows.Count //把总行数读取进$ix
//这里定义一个可变的数组$row[],太久没用,忘了怎么写了...
For $i = 1 To $ix Step +1
$row[$i] = $oExcel.sheet(1).cells($i.1)//逐行读取第一列数据进数组中

//循环结束后就把第一列的数据读入数组$row了