Habe ich probiert. Dort will keiner weiterhelfen...

Hab jetzt mit deiner vorgeschlagenen Alternative weitergemacht. Klappt leider nicht so.
Sobald ich die Screenshots gespeichert hätte wärs kein Problem den Rest mit VBA zu machen.
Am Ende der aufgenommene Code. Wie schätzt du die Lage ein?

Bevor "em80enal" gesendet wird, müsste das Makro an die Kursorpositione 04,019 wechseln.

dazu bin ich auf das gestoßen, funktioniert leider nicht...
Private Declare Sub SetCursorPos Lib "User32" (ByVal X As Long, ByVal Y As Long)
SetCursorPos 4, 19


Die iSeries Funktion Screenshot finde ich nicht. Habe im Menü jede Möglichkeit durchsucht.
Du meinst ja nicht den Print-Key oder?


[PCOMM SCRIPT HEADER]
LANGUAGE=VBSCRIPT
DESCRIPTION=
[PCOMM SCRIPT SOURCE]
OPTION EXPLICIT
autECLSession.SetConnectionByName(ThisSessionName)
REM This line calls the macro subroutine
subSub1_
sub subSub1_()
autECLSession.autECLOIA.WaitForAppAvailable
autECLSession.autECLOIA.WaitForInputReady
autECLSession.autECLPS.SendKeys "em80enal"
autECLSession.autECLOIA.WaitForInputReady
autECLSession.autECLPS.SendKeys "[enter]"
end Sub


vg
Alex