Access will sich nicht schliessen lassen
Dreho52
Gesendet: 25.03.22 09:34
Betreff: Access will sich nicht schliessen lassen


Member

Beiträge: 30
25
Hallo
aus einem Formular will ich eine Word-Datei öffnen und anschliessend Access schliessen.
Das Word-Dokument lässt sich dann gut bearbeiten oder einfach nur ansehen,
aber Access kann ich anschliessend nur noch über den Task-Manager schliessen.

Eigentlich möchte ich Access gar nicht schliessen, aber ich mache dies weil das Word-Dokument hinter dem Access-Fenster versteckt.
Da auch ungeübte Word-Benutzer die Datei nicht sehen unten im Taskmanager schliesse ich Access damit Word im Vordergrund zu sehen ist.
Gibt es da eine bessere Lösung?
Jetzt schon bedanke ich mich für einen Tipp.
Markus

Private Sub Befehl105_Click()
On Error GoTo Err_Word_Click

Dim oApp As Object
Dim strFile As String

Set oApp = CreateObject("Word.Application")
oApp.Visible = True
oApp.Documents.Open "D:\TPSC\01_mitglieder\datenbanken\test.docm"
Set oApp = Nothing
Application.Quit

Exit_Word_Click:
Exit Sub

Err_Word_Click:
MsgBox Err.Description
Resume Exit_Word_Click

End Sub
Top of the page Bottom of the page