GuiXT Programmierung

[kuhnra]

Kann mir bitte jemand die Programmierung unten zu Ende bringen.

Ich habe im SAP-IW58 mehrere Meldenummern in einer Spalte, die

bearbeitet werden müssen. Beim Aufruf der Meldenummer ist im

Hintergrund ein ablaufender Befehle aufgezeichnet (Script

Aufzeichnung). Ist die Meldenummer abgearbeitet, wird die

Hauptmaske mit der Spalte meiner Meldenummern aufgerufen. Jetzt

soll der Befehl kommen "Gehe in die nächste Zelle und arbeite

die selben Befehle erneut ab". Unten ist currentCellRow

= 1 angegeben, also springt er wieder in die erste Zelle

Die Eingabe, einfach in die 2. /3. /4. Zelle zu springen fehlt mir hier, ich bin leider kein Programmierer.

303209358 - Zelle 1 abgearbeitet, springe in Zelle

303209404 - Zelle 2 abgearbeitet, springe in Zelle

303209704 - Zelle 3 abgearbeitet, springe in Zelle

303209744 - Zelle 4 abgearbeitet, springe in Zelle

303209822 - Zelle 5 abgearbeitet, springe in Zelle usw.

Gruß

Rainer

Scrip Aufzeichnung mit GuiXT aus SAP.

If Not IsObject(application) Then

Set SapGuiAuto = GetObject("SAPGUI")

Set application = SapGuiAuto.GetScriptingEngine

End If

If Not IsObject(connection) Then

Set connection = application.Children(0)

End If

If Not IsObject(session) Then

Set session = connection.Children(0)

End If

If IsObject(WScript) Then

WScript.ConnectObject session, "on"

WScript.ConnectObject application, "on"

End If

session.findById("wnd[0]").maximize

session.findById("wnd[0]/usr/cntlGRID1/shellcont/shell").doubleClickCurrentCell

session.findById("wnd[0]/shellcont/shell").selectItem

"0020","Column01"

session.findById("wnd[0]/shellcont/shell").ensureVisibleHorizontalItem

"0020","Column01"

session.findById("wnd[0]/shellcont/shell").clickLink

"0020","Column01"

session.findById("wnd[1]").sendVKey 0

session.findById("wnd[1]").sendVKey 12

session.findById("wnd[1]").sendVKey 0

session.findById("wnd[0]").sendVKey 11

session.findById("wnd[0]/usr/cntlGRID1/shellcont/shell").currentCellRow

= 1