Base de datos con Excel Parte1

Creando una Base de Datos con Excel en Blanco

POTENCIA SU EXCEL
*** Usando Excel con Base de Datos *** Crea la base de datos con Excel con un clic Base de Datos Protegida y Segura
Esta Plantilla crea una base de datos access protegida con contraseña
usa una macro vba para hacer el proceso.Toda la información requerida esta incluida, solo tiene que seguir las instrucciones.

Quienes tienen la MEMBRESIA JFKSOFT PREMIUM pueden solicitarla
sin costo dejando un comentario.

Pegue en un nuevo Boton Macro
Todo lo azul

On Error GoTo aviso
Dim dbsNueva As Database
DBFilename = “C:\Basededatos” & “\jfksoftdb”
If Dir(DBFilename) <> “” Then
MsgBox “Base de datos, Existente!”
Exit Sub
End If
Set dbsNueva = CreateDatabase(DBFilename, _
dbLangGeneral & “;pwd=12345”, dbEncrypt)
MsgBox “La base de datos fue creada…”, vbInformation, “Aviso!”
Exit Sub
aviso:
MsgBox “Error: ” & Err.Description & ” ” & Err.Number

Una vez creada la base de datos puede comenzar a crear las tablas
que es donde se almacena la información. En nuestro Blog encuentra
el código Validado.

2 opiniones en “Base de datos con Excel Parte1”

    1. Este es el codigo VBA para crear bases de datos en blanco
      Sub CrearBase()
      Dim wrkDefault As Workspace
      Dim dbsNueva As Database
      Set wrkDefault = DBEngine.Workspaces(0)
      DBFilename = ThisWorkbook.Path & “\amaster”

      If Dir(DBFilename) <> “” Then
      MsgBox “Base de datos, Existente!”
      Exit Sub
      End If
      Set dbsNueva = wrkDefault.CreateDatabase(DBFilename, _
      dbLangGeneral & “;pwd=123456”, dbEncrypt)
      End Sub

Deja un comentario

Tu dirección de correo electrónico no será publicada. Los campos obligatorios están marcados con *