ArcMap aus Access öffnen

Hallo Forumsnutzer,
erst einmal alles Gute für 2006.

Ich bastele an der Verfeinerung der Verknüpfung zwischen Access und ArcMap. D.h. ich möchte ArcMap aus Access heraus öffnen und auf ein in Access ausgewähltes Objekt zoomen. Soweit so gut.
Nun habe ich das Problem, daß ich die Möglichkeit einbauen möchte, bei mehreren Maps ein Feature aus einer anderen als der aktiven Map auszuwählen. Das funktioniert bei bereits geöffneter mxd-Datei prima (die letzten 4 Zeilen sind dabei identisch mit dem folgenden Code). Mit folgendem Code versuche ich es beim ersten Öffnen der mxd-Datei:

Dim pDoc As esriFramework.IDocument
Dim pMxApp As esriArcMapUI.IMxApplication
Dim pApp As IApplication
Dim pMxDoc As IMxDocument
Dim pEnvelope As esriGeometry.IEnvelope
Dim pMap As IMap
Dim pMaps As iMaps
Dim pActiveView As IActiveView

Set pDoc = New esriArcMapUI.MxDocument
Set pMxApp = pDoc.Parent
Set pApp = pMxApp
pApp.OpenDocument ("C:\temp\test.mxd")

Set pMxDoc = pApp.Document

pMxDoc.ActiveView.Refresh
pApp.Visible = True

Set pMaps = pMxDoc.Maps
Set pMap = pMaps.Item(1) 'in dem Fall mit "1" die zweite Map, kann aber beliebig sein
Set pActiveView = pMxDoc.ActiveView
Set pMxDoc.ActiveView = pMap

Dabei bekomme ich aber immer die nette Fehlermeldung:

"Automatisierungsfehler Ausnahmefehler des Servers"
Fehlernummer "-2147417851"

Wer hat eine Lösung für das Problem.
Danke und Gruß
Gerd