wihle Wend for my excel script

[Redgirl]

Hello all

1^st. Sorry for my bad English I’m Dutch and English is not my best language.

I have a Problem with finishing my Script. I have never bevor work with Autoit in

Combination with Excel. I hope you can help me.

I have create my basic script for a program to found duplicated cases in my

QWS3270 program.

All new cases will be copied inside a Excel sheet in line A

My tool must copies the information from A1 and run a script

In this scripted will be copy new data’s inside the clipboard

And must be passed inside B1

After this he must follow up this with read details in A2 script past info B2 etc.

I can not say how may cell in line A will be used it is different. It can be 30 or 600

But this program must stop at the last cell.

#cs ----------------------------------------------------------------------------
AutoIt Version: 3.3.6.1
Author:      Lilly Jansen
Script Function:
Template AutoIt script.
#ce ----------------------------------------------------------------------------
; Script Start - Add your code below here

#include <Excel.au3>
 
$sFilePath1 = @ScriptDir & "\Test1.xls" ; Diese Datei sollte bereits existieren

$oExcel = _ExcelBookOpen($sFilePath1)
$sCellValue = _ExcelReadCell($oExcel, 1, 1)
clipput($sCellValue)
 
; That scripted will be changed it was only for testing the will make the _ExcelReadCell($oExcel, 1, 1) sin
 
WinActivate ("a1.txt")
WinWaitActive ("a1.txt")
Sleep (1000)
Send("{LSHIFT down}")
send ("{right 6}")
Send("{LSHIFT up}")
send ("^c")
While Sleep(50)
$sText = ClipGet()
_ExcelWriteCell($oExcel, $sText, 1, 2)
Do
Sleep(50)
Until ClipGet() <> $sText
WEnd

Please can anyone help me

Thanks

Redgirl