Wie kann ich Werte aus der Baumtabelle in Excel übertragen?

[ma-gruber]

Hallo zusammen

Über die Transaktion CT04 wurde ein Verwendungsnachweis eines Merkmal und bestimmten Merkmalwertes ausgeführt.

Das Ergebnis soll in eine Excel überführt werden.
Nun gibt es ja für die Baumstruktur keine Exportmöglichkeit, also via VBA Script.
Jedoch kann ich zwar den angezeigt Datensatz markieren, aber nicht kopieren.
Sicher recht einfach?
Bisheriger Script:
'Aus SAP Script

session.findById("wnd[0]/tbar[0]/okcd").Text = "/nCT04"

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

session.findById("wnd[0]/usr/subCHARACT:SAPLCTMV:2000/subHEADER:SAPLCTMV:1100/ctxtRCTAV-ATNAM").Text = Cells(2, 1).Text 'holt das Merkmal

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

session.findById("wnd[0]/mbar/menu[4]/menu[0]").Select

session.findById("wnd[0]/usr/chkGF_CLASS").Selected = False

session.findById("wnd[0]/usr/chkGF_CONFIG").Selected = True

session.findById("wnd[0]/usr/ctxtCAWN-ATWRT").Text = Cells(2, 2).Text 'holt den Merkmalswert

session.findById("wnd[0]/usr/txtG_MAXHITS").Text = "9999"

session.findById("wnd[0]/tbar[1]/btn[8]").press

'Werte auslesen

session.findById("wnd[0]/usr/cntlUSAGE_TREE_CONTAINER/shellcont/shell/shellcont[1]/shell[1]").selectItem " 4", "&Hierarchy"

session.findById("wnd[0]/usr/cntlUSAGE_TREE_CONTAINER/shellcont/shell/shellcont[1]/shell[1]").ensureVisibleHorizontalItem " 4", "&Hierarchy"

session.findById("wnd[0]/usr/cntlUSAGE_TREE_CONTAINER/shellcont/shell/shellcont[1]/shell[1]").topNode = "