Доступ к Аксапте из внешнего приложения

[DenisS]

2 EVGL: Спасибо за совет через DDE - все получилось !!!.
Вод код на VB (предварительно надо запустить Axapta и открыть форму tutorial_dde_server)

Private Sub CommandButton1_Click()
ChannelNumber = Application.DDEInitiate( _
app:="Axapta", _
topic:="System")
S = Application.DDERequest(ChannelNumber, "Table")

For i = LBound(S) To UBound(S)
Worksheets("Sheet1").Cells(i, 1).Formula = S(i, 1)
Next i

Application.DDETerminate ChannelNumber

End Sub