Hi,
Ich habe eine Anwendung (Access 2007 / Win 10 pro 64) aus der ich ein Formular aus einer anderen DB aufrufe. Ich habe diese Funktion nun schon eine längere Zeit nicht mehr benutzt. Es hat definitiv aber funktioniert. Seit neuestem hängt sich aber Access bei dieser Funktion auf und kann nur hart geschlossen werden.
Wenn ich aber in der AutoExec-Funktion der aufgerufenen DB testweise eine MessageBox einbaue (mit vbOKonly), läuft die Anwendung wie gewünscht (Außer dem Klick in der Messagebox).
Hier die Aufruf-Funktion :
Public Function Form_in_AET(ByVal FrmName As String)
Dim DB_AET As String
Dim appAET As Access.Application
On Error GoTo Err_Form_in_AET
DB_AET = "Pfad\MeineDB.accdb"
Set appAET = New Access.Application
Set appAET = CreateObject("Access.Application")
appAET.OpenCurrentDatabase DB_AET, False
appAET.DoCmd.OpenForm FrmName, , , , , acDialog
appAET.CloseCurrentDatabase
Set appAET = Nothing
Exit Function
Resume
Err_Form_in_AET:
MsgBox (Err.Number & vbCrLf & Error)
End Function
Wenn ich das Programm dann abbreche kommt eine Fehlermeldung : Automatisierunsfehler : Ein Aufruf im Messagefilter ist unzulässig.
Ich steh auf dem Schlauch. Hoffentlich kann jemand helfen.
Grüße
Hallo,
sehe Dir diesen Beitrag mal an.
http://www.office-loesung.de/ftopic510039_0_0_asc.php
Hi, die Möglichkeit über Verweise die Datenbanken zu verbinden scheidet in meinem Fall aus.
Aber Gott sei Dank hilft es oft, wenn man eine leere Datenbank erzeugt und alle Objekte importiert.
Bin auf diese eigentlich naheliegende Lösung nicht gekommen. Nachdem ich das gemacht habe, ist der Fehler behoben.
Trotzdem Danke für Deinen Vorschlag
Grüße