Live-Forum - Die aktuellen Beiträge
Datum
Titel
17.10.2025 17:57:35
Zellen-Name aus A1 nach H1 übertragen mit Prä- + Suffix
17.10.2025 11:36:58
verschachteltes Dropdown-Menü
17.10.2025 10:28:49
Call Anweisung
16.10.2025 18:38:17
Zusammenfassung nach Personalnummer
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1312to1316
1312to1316
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Access schreibgeschützt starten

Forumthread: Access schreibgeschützt starten

Access schreibgeschützt starten
21.05.2013 10:28:51
dieterlem
Hallo Excelfreunde,
ich möchte aus Excel heraus Access schreibgeschützt starten. Aus der StartZeile in Windows mache ich das so:
msaccess.exe /ro "C:\"db.accdb"
Starten aus Excel:
Dim AccObj as Object
Set AccObj = CreateObject("Access.Application")
AccObj.Visible = True
AccObj.OpenCurrentDatabase("C:\"db.accdb")
Wie kann ich Access aus Excel VBA schreibgeschützt öffnen?
Ist es auch möglich Parameter (zb. Kundenname) beim öffnen mit zu übergeben? Zb. msaccess.exe /ro "C:\"db.accdb" /cmd "Kunde"
Danke für eure Hilfe
Gruß
Dieterlem

Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Access schreibgeschützt starten
21.05.2013 11:11:50
Luschi
Hallo Dieterlem,
da Du die Accessdatei mit sichtbarer Accessbenutzeroberfläche öffnen willst,
mußt Du auf eine Windows-API-Funktion zurückgreifen.
Hier ein Beispiel: 

Private Declare Function ShellExecute Lib "shell32.dll" Alias _
"ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation _
As String, ByVal lpFile As String, ByVal lpParameters _
As String, ByVal lpDirectory As String, ByVal nShowCmd _
As Long) As Long
Sub acc_Oeffnen_ro()
Dim xPath As String, xFile As String
xPath = "C:\Users\abc\Documents\"
xFile = "Database2.accdb"
Call ShellExecute(Application.hwnd, "Open", xFile, "/ro", xPath, 1)
End Sub
Gruß von Luschi
aus klein-Paris

Anzeige
AW: Access schreibgeschützt starten
21.05.2013 20:18:10
Dieterlem
Hallo Luschi,
danke für deine Hilfe. Ich werde das nachher gleich mal testen.
Gruß
Dieterlem
;

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige