ist es möglich, aus einer UserForm via Optionsbutton auf eine spezielle Access Datenbank zuzugreifen? Ich denke schon, weiss aber nicht wie... Vielen Dank im voraus. Gruss Manuela
willst du jeweils eine neue Datenbak ansprechen oder ist es immer die selbe DB.
Falls es immer die selbe ist, schreibe dir den Pfad in eine Zelle und beziehe dich dann darauf. Hier die Zelle A1.
Private Sub CommandButton2_Click()
Dim accApp As Object
Dim sFile As String
sFile = Range("A1").Value
If Dir(sFile) = "" Then
Beep
MsgBox "Access-Datenbank wurde nicht gefunden!"
Else
Set accApp = CreateObject("Access.Application")
accApp.OpenCurrentDatabase sFile
Set accApp = Nothing
End If
End Sub
Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden
Suche nach den besten AntwortenEntdecke unsere meistgeklickten Beiträge in der Google Suche
Top 100 Threads jetzt ansehen