Удав написал(а):
У вас разрешен GUI-скриптинг, но нет полномочий на SE16/SE16N?
Такая задача проще решается, через выгрузку данных таблицы AUSP 001 вида класса.
Это первое что я проверил, но к AUSP нет доступа.
Запросить доступ можно, но пока его дадут месяц пройдет.
В общем добыть все значения из этой псевдотаблицы оказалось проще чем я думал (передать в эксель уже мелочи):
Code:
t = "wnd[0]/usr/subSUBSCR_BEWERT:SAPLCTMS:5000/tabsTABSTRIP_CHAR/tabpTAB1/ssubTABSTRIP_CHAR_GR:SAPLCTMS:5100/tblSAPLCTMSCHARS_S"
cN = "ctxtRCTMS-MNAME" 'char name
cV = "ctxtRCTMS-MWERT" 'char value
For i = 0 To .findById(t).verticalScrollbar.Maximum
.findById(t).verticalScrollbar.Position = i
с1 = .findById(t & "/" & cN & "[0,0]").Text
с2 = .findById(t & "/" & cV & "[1,0]").Text
Debug.Print i, .findById(t).verticalScrollbar.Maximum, с1, с2
Next
А чтобы записать обратно - нажимаем кнопку с поиском по названию, найденная характеристика всегда будет первой в списке.