Mahlzeut zusammen,
ich möchte über VBA ein SAP GUI Script steuern, welches ein spezifisches Layout anhand des Namens auf eine Transaktion anwendet.
Dazu möchte ich während die Layoutwahl geöffnet ist, folgenden Code ausführen. Der Code verrät mir sogar die richtige Zeile, in der das Layout sich befindet, jedoch kann dieses anscheinend nicht ausgewählt werden. Fehlercode ist immer "-2147024809 (80070057)
Code:
Dim GrdView As Object
Set GrdView = session.findById("wnd[1]/usr/ssubD0500_SUBSCREEN:SAPLSLVC_DIALOG:0501/cntlG51_CONTAINER/shellcont/shell")
TotalRow = GrdView.RowCount
VisibleRow = GrdView.VisibleRowCount
Scrol = VisibleRow
Do
For I = 0 To VisibleRow
If GrdView.GetCellValue(I, GrdView.ColumnOrder(0)) = "/KA_MONIT2" Then
GrdView.CurrentCellRow = I
GrdView.SelectedRows = CStr(I)
GrdView.ClickCurrentCell
Exit Do
End If
Next
Scrol = Scrol + VisibleRow
Loop Until Scrol >= TotalRow
Muss ehrlich gestehen, dass ich völlig ratlos bin, warum dieser Fehlercode immer wieder kommt.
Vielen Dank im Voraus
MFG mmayr30
|