Supportnet / Forum / Tabellenkalkulation
Hilfe zu einem Code: Aus Excel ein Access Makro starten
Frage
Hallo,
ich brauch Eure Hilfe. Der Code stopt immer an der Stelle objAccApp.Run "Makro1" als ob er den Makro nicht findet.
Habt Ihr vielleicht eine Idee.
Option Explicit
Public Sub Access_Macro_Starten()
Dim objAccApp As Object
Dim strMDBDatei As String
strMDBDatei = "E:\Test.mdb"
If Dir(strMDBDatei) = "" Then
MsgBox "Access-Datenbank wurde nicht gefunden!"
Else
Set objAccApp = CreateObject("Access.Application")
objAccApp.OpenCurrentDatabase strMDBDatei
objAccApp.Run "Makro1"
objAccApp.CloseCurrentDatabase
Set objAccApp = Nothing
End If
End Sub
Danke für Eure Mühe!!!
Gruß
Elhamplo
Antwort 1 von Saarbauer
Hallo,
vielleicht hilft das weiter
https://supportnet.de/threads/1716868
ist zwar nicht genau passend, könnte aber den passenden Denkanstoss enthalten
Gruß
Helmut
vielleicht hilft das weiter
https://supportnet.de/threads/1716868
ist zwar nicht genau passend, könnte aber den passenden Denkanstoss enthalten
Gruß
Helmut