Cómo insertar un registro en la base de datos VBA

VBA es un lenguaje de programación desarrollado por Microsoft para su uso en un número de productos de Microsoft , como Microsoft Office. Los programadores pueden crear bases de datos en un programa, como el acceso, y luego insertar datos en la base de datos desde otra aplicación , como Excel. Acceso a una base de datos para insertar un registro en él desde VBA requiere una conexión a la base de datos en el código VBA , el establecimiento y la inserción de registros a una base de datos en VBA es bastante fácil para un programador novato para lograr en unos pocos pasos. Instrucciones
1

Abrir Excel.

2 Haga clic en " Herramientas" de Microsoft "Macro " y luego haga clic en " Visual Basic " . Esto abrirá el entorno de programación VBA.
3

Haga clic en " Insertar" y " módulos". Ahora se encuentra en un módulo de código de programación
4

Escriba o copie y pegue los siguientes procedimientos secundarios en el módulo de código : . Exportaciones

Sub ADOFromExcelToAccess ()

' los datos de la hoja de cálculo activa a una tabla en una base de datos

' este procedimiento deben ser editados antes de su uso

cn As ADODB.Connection , ADODB.Recordset Como rs , r As Long

' conectarse a la base de datos Access

Set cn = New ADODB.Connection

cn.Open " Provider = Microsoft.Jet.OLEDB.4.0 ; " & _
< p> "Data Source = C: \\ FolderName \\ DataBaseName.mdb ; "

' abrir un conjunto de registros

Set rs = New ADODB.Recordset

rs.Open TableName " " , cn, adOpenKeyset , adLockOptimistic , adCmdTable

' todos los registros de una tabla

r = 3 ' de la fila de inicio en la hoja

Do While Len ( Range (" a " & r ) . Formula) > 0

' repetir hasta la primera celda vacía de la columna A

RS