Pergunta : Como pode uma base de dados do acesso ser aberta em uma janela nova usando o acesso VBA?

Eu tenho este: o

How pode uma base de dados do acesso ser aberto em uma janela nova usando o acesso VBA? o

Public que o strDB secundário do

Dim de OpenDatabase (DatabaseName) como appAccess de String
Dim como o strFilename de Access.Application
Dim como String
Dim PathIs como String

'** deteta o path
'PathIs = Application.CurrentProject.Path

DriveLetter = saiu (Application.CurrentProject. Path, 1)
PathIs = DriveLetter & “: \” & DatabaseName
strDB = PathIs & “\” & de DatabaseName & “de .accdb " criam o exemplo novo da base de dados aberta dos appAccess de Microsoft Access.
Set = do

'** de CreateObject

'** (“Access.Application”) no strDB secundário aberto do

Dim do
End Sub
Public OpenDatabase
do strDB

'** AutoExec form.
appAccess.DoCmd.OpenForm “AutoExec do " de Microsoft Access window.
appAccess.OpenCurrentDatabase (DatabaseName) como appAccess de String
Dim como o strFilename de Access.Application
Dim enquanto String
Dim PathIs como String

'** deteta o path
'PathIs = Application.CurrentProject.Path

DriveLetter = saiu (Application.CurrentProject. Path, 1)
PathIs = DriveLetter &”: \ “& DatabaseName
strDB = PathIs &” \ “& de DatabaseName &” de .accdb " criam o exemplo novo da base de dados aberta dos appAccess de Microsoft Access.
Set = do

'** de CreateObject

'** (“Access.Application”) no
End Sub
do strDB

'** AutoExec form.
appAccess.DoCmd.OpenForm “AutoExec do " de Microsoft Access window.
appAccess.OpenCurrentDatabase class= do

Resposta : Como pode uma base de dados do acesso ser aberta em uma janela nova usando o acesso VBA?

Fêz você fêz alguma mudança no galão?
se sim você pôde precisar de esperar a réplica.