Aus Excel eine Access Anwendung starten

Hallo zusammen,

ich möchte aus einer Excel Tabelle per Makro eine Access :Anwendung starten.

Kann mir jemand sagen, wie das Makro lauten muss.

Vielen dank schon mal.

Gruß

HM

Hallo HM,

ich denke, so in der Art müsste das aussehen.

Dim stAppName As String

stAppName = „C:\programme\microsoft office\office12\msaccess.exe C:\Beispieldatenbank.accdb“
Call Shell(stAppName, 1)

Gruß Peter

Hallo HM,

sorry da kann ich Dir leider nicht weiterhelfen. Habe (leider) nur am Rande mit Access zu tun?

Gruß
Frank

Hi,

leg mal einen Command Button an und gib im Entwurfsmodus unter „Code anzeigen“ folgendes ein:

Shell „msaccess G:\Test.accdb“, 3

Sollte dann so aussehen:

Private Sub CommandButton1_Click()
Shell „msaccess G:\Test.accdb“, 3
End Sub

msaccess ist für die Anwendung
G:\Test.accdb für die Datenbank
3 für „Das Fenster wird maximiert mit Fokus angezeigt“

Gruß
HaPe

Danke für eure Antworten, aber irgendwie komme ich noch nicht ganz klar.

Ich versuche mal den genauen weg aufzuzeichnen.

Ich brauche ein Makro in Excel, das dieses Verzeichnis öffnet.

Die Anwendung heißt Auftrags – Anwendung und liegt I:\

Die Excelmappe heißt Externeaufträge in der das Makro programmiert sein muss…

Vielleicht könnt Ihr mir ja mal das Makro schreiben.

Danke schon mal.

Gruß

HM

Danke für eure Antworten, aber irgendwie komme ich noch nicht ganz klar.

Ich versuche mal den genauen weg aufzuzeichnen.

Ich brauche ein Makro in Excel, das dieses Verzeichnis öffnet.

Die Anwendung heißt Auftrags – Anwendung und liegt I:\

Die Excelmappe heißt Externeaufträge in der das Makro programmiert sein muss…

Vielleicht könnt Ihr mir ja mal das Makro schreiben.

Danke schon mal.

Gruß

HM
.

Hallo HM,

OK:

  1. Frisches Excel-Blatt nehmen
  2. Ein Bild einfügen
  3. Makro mit VBA-Editor schreiben Inhalt:

Sub MeinMakro()

MsgBox „Hallo“

Dim stAppName As String

stAppName = „C:\programme\microsoft office\office12\msaccess.exe C:\Beispiel.accdb“
Call Shell(stAppName, 1)

End Sub

  1. Rechte Maus auf Bild - zuweisen „Mein Makro“

  2. Beispiel-Datenbank in C:\Beispiel.accdb speichern

  3. Pfad prüfen von Access, die Datei msaccess.exe muss im Verzeichnis
    C:\programme\microsoft office\office12 liegen - > falls nicht mit Explorer nach msaccess.exe suchen und Pfad korrigieren.

  4. Alles speichern und dann Doppeltklick auf Bild in Excel

Müsste erst MessageBox mit Hallo kommen, dann OK klicken
Dann müsste Access geöffnet werden und die Beispieldatenbank angezeigt werden.

  1. Beispieldatenbank in I:\Auftrags-Anwendung.accdb ändern

  2. Viel Erfolg

Gruß Peter

Hi,
hast Du denn das mit dem Button schon mal probiert?

Du brauchst eigentlich nur Deinen Pfad angeben:

Shell „msaccess I:\Auftrags – Anwendung.mdb“, 3

Wie willst Du denn das Makro ausführen?
Menüleiste, Symbolleiste; Button (wie in meinem Bsp.)?

Wenn Du ein Makro erstellen willst (ich gehe mal davon aus Du hast nicht Excel2007), gehst Du auf Extras - Makros - Makros.
In dem geöffneten Popup gibs Du unter „Makroname:“ die Bezeichnung ein, z. B. DBoeffnen und wählst bei „Makros in:“ Entweder „Diese Arbeitsmappe“ oder „Externeaufträge“ aus.
Dann klickst Du auf erstellen.

Es öffnet sich das VisualBasic Fenster, wo auf der rechten Seite folgendes stehen sollte:

Sub DBoeffnen()

End Sub

Zwischen diese beiden Zeilen schreibst Du die Zeile
Shell „msaccess I:\GenauerPfad Deiner DB“, 3

Sub DBoeffnen()
Shell „msaccess I:\GenauerPfad Deiner DB“, 3
End Sub

Dann „Datei Schließen und zurück zu MS Excel“

Um das Makro einer Symbolleiste zuzuordnen musst Du:

  • mit der rechten MT auf eine Symbolleiste klicken und Anpassen wählen
  • Unter Befehle-Kategorien nach Makros suchen
  • Unter Befehle-Befehle taucht Dein Makro „DBoeffnen“ auf
  • das mit der linken MT anklicken und in eine Symbolleiste ziehen (über die rechte MT kann das Symbol dann noch angepasst werden)
  • Anpassen schließen

Wenn Du nun auf das Symbol klickst und Dein Pfad ist richtig eingegeben sollte sich die I:\Auftrags – Anwendung.mdb maximiert öffnen.

Gruß
HaPe

Tut mir leid, damit habe ich selbst keine Erfahrung.
mfg

Hallo Hans-Peter,

sorry das ich mich erst jetzt melde,
aber meine Zeit hat es vorher nicht zugelassen.

Ich habe dir mal das Makro kopiert.

Sub AccessÖffnen()

’ AccessÖffnen Makro
’ Makro am 27.03.2010 aufgezeichnet

Shell „msaccess I:\Anwendung Nov 2009.mdb“, 3
End Sub

Leider öffnet sich die anwendung nicht sondern es kommt follgende Fehlermeldung:

Die Befehlszeile, mit der Sie Microsoft Acces gestartet haben, enthält eine Option, die Microsoft Access unbekannt ist.

Wußte garnicht das es so schwer ist, eine Access Anwendung über ein Excelmakro zu öffnen.
Oderner oder andere Exceltabellen lassen sich ja auch über Makros problemlos öffnen.

Vielleicht hast du ja ne Idee oder ich stelle nich nur blöd an, lach.

Gruß

HM

und ein schönes WE

Hi,

lass mal aus dem Namen Deiner mdb die Leerzeichen weg oder vergib mal folgenden Namen:

Anwendung_Nov_2009.mdb

Wichtig sind die „_“ Unterstriche.

In Excel schreibst Du dann

Shell „msaccess I:\Anwendung_Nov_2009.mdb“, 3

Gruß
Hans-Peter

ich habe das gemacht. Hat nicht geklappt.
Habe die Anwendung nun mal ohne Leerzeichen umbenannt, aber es kommt nun folgende Fehlermeldung:

Microsoft Office Access kann die DatenbankdateiI:\AnwendungNov2009.mdbnicht finden.

Du must dann auch den Text in Excel anpassen

Shell „msaccess I:\AnwendungNov2009.mdb“, 3

Hallo Hans-Peter,

super, nun klappt es.

Einen herzlichen Dank für deine Geduld.

Bis bald mal.

Gruß

HM