ODBC Zugriff aus EXCEL

[Hubert]

Guten Tag zusammen,

seit mehr als einem Jahr läuft bei uns ein VBA Script in Excel, das Daten aus der AS/400 liest und daraus einen Report generiert. Der Zugriff erfolgt über ODBC. Nachdem das EXCEL auf einen anderen Server gespielt wurde, kann [B]eine[B] der angesprochenen Dateien nicht mehr gelesen werden.

strselect = "select * from SYSCHK.SYSCHK"
        With rsAS400
            .CursorType = adOpenForwardOnly
            .CursorLocation = adUseClient
            .Open strselect, conAS400
        End With

Beim Open kommt die Fehlermeldung:



Während die Datei geöffnet werden soll, ist die Verbindung zur AS/400 aktiv. Andere Dateien werden problemlos geöffnet.

Hatte jemand von Euch eine Idee, woran das liegen kann?

Herzlichen Dank im Voraus

Hubert