Ciao a tutti,

premetto che non sono molto esperto di VBA e ringrazio in anticipo chi mi può aiutare.
Sintetizzo il mio problema. Vorrei da una macro in excel 2010 aprire un database access 2010 (estenzione .accdb) e aprire una maschera.

Ho utilizzato questo codice:

Public Sub prova()

Dim strDB As String, ThisDir As String
Dim DBApp As Access.Application

ThisDir = ("D:\Value")
strDB = ThisDir & "\" & "Valore - Copia.accdb"

Set DBApp = New Access.Application
DBApp.OpenCurrentDatabase strDB
DBApp.Visible = True

'DBApp.DoCmd.RunMacro ("Macro1")
appAccess.DoCmd.OpenForm ("Parametri")

'appAccess.Quit
DBApp.Visible = msoTrue

Set DBApp = Nothing

End Sub




Il problema che ho è che una volta che chiudo la maschera, l'applicazione Access si chiude.
Vorrei, invece, che la macro si interrompesse permettendomi di continuare a lavorare con access. Si può fare? Come potrei fare?