Supportnet Computer
Planet of Tech

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