Hey,

probier es mal so

'ab hier mein SAP Skript
 With session
    .findById("wnd[0]/usr/cntlIMAGE_CONTAINER/shellcont/shell/shellcont[0]/shell").selectedNode = "F00182"
    .findById("wnd[0]/usr/cntlIMAGE_CONTAINER/shellcont/shell/shellcont[0]/shell").doubleClickNode "F00182"
    .findById("wnd[0]/tbar[1]/btn[17]").press
    .findById("wnd[1]/tbar[0]/btn[8]").press
    .findById("wnd[1]/usr/cntlALV_CONTAINER_1/shellcont/shell").currentCellRow = 1
    .findById("wnd[1]/usr/cntlALV_CONTAINER_1/shellcont/shell").selectedRows = "1"
    .findById("wnd[1]/usr/cntlALV_CONTAINER_1/shellcont/shell").doubleClickCurrentCell
    .findById("wnd[0]/tbar[1]/btn[8]").press
    .findById("wnd[1]/tbar[0]/btn[0]").press
    .findById("wnd[0]/usr/cntlGRID1/shellcont/shell/shellcont[1]/shell").setCurrentCell 8, "TEXT"
    .findById("wnd[0]/usr/cntlGRID1/shellcont/shell/shellcont[1]/shell").selectedRows = "8"
    .findById("wnd[0]/usr/cntlGRID1/shellcont/shell/shellcont[1]/shell").contextMenu
    .findById("wnd[0]/usr/cntlGRID1/shellcont/shell/shellcont[1]/shell").selectContextMenuItem "&XXL"
    .findById("wnd[1]/tbar[0]/btn[0]").press
    .findById("wnd[1]/usr/ctxtDY_PATH").SetFocus
    .findById("wnd[1]/usr/ctxtDY_PATH").caretPosition = 8
    .findById("wnd[1]").sendVKey 4
    .findById("wnd[2]/usr/ctxtDY_PATH").Text = "T:\\Pfad1"
    .findById("wnd[2]").sendVKey 4
    .findById("wnd[3]/usr/ctxtDY_FILENAME").Text = "Export-File.XLSX"
    .findById("wnd[3]/usr/ctxtDY_FILENAME").caretPosition = 38
    .findById("wnd[3]/tbar[0]/btn[11]").press
    .findById("wnd[2]").Close
    .findById("wnd[1]/usr/ctxtDY_FILENAME").SetFocus
    .findById("wnd[1]/usr/ctxtDY_FILENAME").caretPosition = 43
    .findById("wnd[1]/tbar[0]/btn[11]").press
End With
' Makro Close_Export_file
Workbooks("Export-File.xlsx").Close SaveChanges:=True
End Sub

Gruß