Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Access Makro aus Excel starten

Access Makro aus Excel starten
03.03.2009 14:53:04
Stefan
Hallo,
schon wieder ich:
Habe im Archiv folgenden Code gefunden (von mir schon angepasst):
</p><pre>Sub CallAccessMacro()
Dim accApp As Object
Dim sFile As String
sFile = "J:\Test\eto.mdb"
If Dir(sFile) = "" Then
Beep
MsgBox "Access-Datenbank wurde nicht gefunden!"
Else
Set accApp = CreateObject("Access.Application")
accApp.OpenCurrentDatabase sFile
accApp.Run "Makro1"
accApp.CloseCurrentDatabase
Set accApp = Nothing
End If
End Sub</pre><p>
Das Programm hängt sich bei der Zeile accApp.OpenCurrentDatabase sFile auf.
Woran kann es denn liegen? Wer kann mir hier weiterhelfen?
Gruß, Stefan
Anzeige

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Access Makro aus Excel starten
03.03.2009 15:04:15
Renee
Hi Stefan,
Ich seh da keine Probleme.
Was heisst für dich, Zitat: Das Programm hängt sich...auf. ?
Im Debugger ?
Kommt eine Meldung ?
Wird Access gestartet ?
Hat die DB ein Makros1 in einem Modul ?
Ist die DB Passwort geschützt ?
GreetZ Renée
AW: Access Makro aus Excel starten
03.03.2009 15:21:43
Stefan
Hallo,
anbei die Fehlermeldung:
Laufzeitfehler '7866'
Microsoft Office Access kann die Datenbank nicht öffnen, da sie nicht existiert, oder da ein anderer Benutzer sie bereits im Exklusivmodus geöffnet hat.
Die DB existiert sonst würde ja die MsgBox sich melden.
Access wird nicht gestartet.
Gruß, Stefan
Anzeige
AW: Access Makro aus Excel starten
03.03.2009 15:29:28
Renee
Hi Stefan,
Die Fehlermeldung ist ja wohl eindeutig.
Microsoft Office Access kann die Datenbank nicht öffnen, da sie nicht existiert, oder da ein anderer Benutzer sie bereits im Exklusivmodus geöffnet hat.
Die Msgbox meldet sich nur, wenn die Datei nicht existiert.
Die Datei mag existieren. Ist es aber auch eine gültige Access-Datei ? Öffnet sich Access, wenn du sie im Windows-Explorer doppelklickst ?
GreetZ Renée
Anzeige
AW: Access Makro aus Excel starten
03.03.2009 15:33:19
Stefan
Hallo,
könnte das was mit der Sicherheitsstufe in Access zu tun haben - Unsichere ...usw.?
Wo kann man denn die Sicherheitsstufe herunterstellen?
Gruß, Stefan
AW: Access Makro aus Excel starten
03.03.2009 15:54:51
Stefan
...ok - gelöst!
Jetzt bleibt das Programm bei accApp.Run "Makro1" hängen.
Muss ich hier irgendetwas wichtiges beachten?
Gruß, Stefan
Anzeige
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Anzeige
Anzeige

Infobox / Tutorial

Access Makro aus Excel starten


Schritt-für-Schritt-Anleitung

Um ein Access-Makro aus Excel zu starten, befolge diese Schritte:

  1. Öffne Excel und drücke ALT + F11, um den VBA-Editor zu öffnen.

  2. Füge ein neues Modul hinzu: Rechtsklick auf "VBAProject (deineDatei.xlsx)" > Einfügen > Modul.

  3. Kopiere den folgenden Code in das Modul:

    Sub CallAccessMacro()
        Dim accApp As Object
        Dim sFile As String
        sFile = "J:\Test\eto.mdb"
    
        If Dir(sFile) = "" Then
            Beep
            MsgBox "Access-Datenbank wurde nicht gefunden!"
        Else
            Set accApp = CreateObject("Access.Application")
            accApp.OpenCurrentDatabase sFile
            accApp.Run "Makro1"
            accApp.CloseCurrentDatabase
            Set accApp = Nothing
        End If
    End Sub
  4. Speichere und schließe den VBA-Editor.

  5. Starte das Makro: Gehe zurück zu Excel, drücke ALT + F8, wähle CallAccessMacro und klicke auf "Ausführen".


Häufige Fehler und Lösungen

Wenn du beim Ausführen des Codes auf Probleme stößt, könnten folgende Fehler auftreten:

  • Laufzeitfehler '7866': Dieser Fehler zeigt an, dass die Access-Datenbank nicht geöffnet werden kann. Mögliche Ursachen sind:

    • Die Datenbank existiert nicht am angegebenen Pfad.
    • Die Datenbank ist bereits von einem anderen Benutzer im Exklusivmodus geöffnet.

    Lösung: Stelle sicher, dass die Datei vorhanden ist und nicht von jemandem anders geöffnet wurde.

  • Access wird nicht gestartet: Überprüfe, ob die Datei eine gültige Access-Datenbank ist. Du kannst dies testen, indem du die Datenbank manuell über den Windows-Explorer öffnest.

  • Makro läuft nicht: Wenn das Programm bei accApp.Run "Makro1" hängen bleibt, könnte das an fehlenden Berechtigungen liegen.

    Lösung: Stelle sicher, dass die Access-Makros aktiviert sind und dass das Makro "Makro1" in der Datenbank existiert.


Alternative Methoden

Es gibt verschiedene Methoden, um ein Access-Makro aus Excel zu starten:

  • Direktes Öffnen der Access-Datenbank: Statt ein Makro zu verwenden, kannst du die Datenbank direkt öffnen und die gewünschten Operationen manuell ausführen.
  • Verwendung von DoCmd: In Access kannst du auch DoCmd.RunMacro verwenden, um ein Makro direkt aus Access zu starten, wenn du bereits in der Access-Umgebung bist.

Praktische Beispiele

Hier sind einige praktische Anwendungsbeispiele für den Code:

  1. Daten aus Excel in Access importieren: Du kannst ein Makro zur Datenverarbeitung in Access verwenden, um Daten aus einer Excel-Tabelle zu importieren und zu verarbeiten.
  2. Berichte automatisiert erstellen: Erstelle ein Access-Makro, das automatisch Berichte generiert, wenn es aus Excel aufgerufen wird.

Tipps für Profis

  • Sicherheitsstufe in Access anpassen: Wenn du Schwierigkeiten hast, das Access-Makro auszuführen, solltest du die Sicherheitsstufe in Access überprüfen. Gehe zu Datei > Optionen > Trust Center > Einstellungen für das Trust Center und senke die Sicherheitsstufe für Makros.
  • Fehlerprotokollierung: Implementiere eine Fehlerprotokollierung in deinem VBA-Code, um Probleme schneller zu identifizieren. Nutze On Error GoTo zur Fehlerbehandlung.

FAQ: Häufige Fragen

1. Warum kann ich die Access-Datenbank nicht öffnen?
Die häufigsten Gründe sind, dass die Datei nicht existiert oder von einem anderen Benutzer im Exklusivmodus geöffnet ist. Überprüfe den Pfad und den Status der Datei.

2. Wie aktiviere ich Access-Makros?
Gehe zu Datei > Optionen > Trust Center > Einstellungen für das Trust Center und aktiviere die Option für die Ausführung von Makros.

3. Was mache ich, wenn AccApp nicht funktioniert?
Stelle sicher, dass die Access-Anwendung korrekt installiert ist und dass der Code keine Fehler enthält. Überprüfe auch, ob die Datei am richtigen Ort gespeichert ist.

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige