Du kannst im Makro, per VB, mit den ADO-Methoden direkt auf die AS/400 zugreifen.

- VB-Editor
- Extras->Verweise->Michrosoft ActiveX Data Objects ankreuzen

Beispiele für Verbindungen findest du hier im Forum.