Excel Zugriff auf CommandButton in Acces
21.10.2020 16:14:29
Steven
ich führe folgenden Code aus Excel aus um in einer Access DB eine Schaltfläche auszulösen.
Wenn der Pfad auf die lokal gespeicherte Kopie der Datenbank verweist funktioniert der Code, sobald der Pfad auf den Server verweist funktioniert er nicht mehr.
Bei der Zeile .Forms("Dateneingabe").datensatzspeichern_Click meldet er "Laufzeitfehler 2465: Anwendungs- oder objektdefinierter Fehler".
Ich bitte euch um Hilfe.
Sub AccessSpeichern()
Dim appAccess As Object
Set appAccess = CreateObject("Access.Application")
appAccess.OpenCurrentDatabase ("\\RPSLF1\Daten-Safe\Anlagen\Zentralanlagen-Verwaltung.mdb")
'appAccess.OpenCurrentDatabase ("C:\Users\MEIN_NAME\Desktop\Zentralanlagen-Verwaltung.mdb")
appAccess.Visible = True
With appAccess
Application.DisplayAlerts = True
.DoCmd.OpenForm "Dateneingabe"
.Forms("Dateneingabe").datensatzspeichern_Click
End With
Set appAccess = Nothing
End Sub
Anzeige