Es tan sencillo como lo siguiente:
Utilizando la librería de DAO (referenciarla antes) podría ser de esta forma
_______________________________________________
Public Sub CreaBaseDeDatos(ByVal BaseDeDatos As String)
Dim db As DAO.Database
Set db = DBEngine.Workspaces(0).CreateDatabase( _
BaseDeDatos, dbLangGeneral)
db.Close
Set db = Nothing
End Sub
_______________________________________________
Por ejemplo si escribes CreaBaseDeDatos "Vacía.mdb"
Te creará una base de datos en la carpeta actual.
Saludos desde la calle Estafeta de Pamplona:
Eduardo Olaz
Microsoft [MVP] Access
***@olaz.net
"Sólo se que cada vez ignoro más cosas" (yo)
Post by Pancho Man¿Se puede crear desde código una nueva base de datos Access desde otra que ya
tengo abierta? ¿Cómo?
Muchas Gracias.