Haz Microsoft Access 2007 bases de datos más dinámico y automatizado con el Editor de Visual Basic (VBE ) . El VBE es la cáscara de programación se incluye con Access que utiliza Visual Basic para Aplicaciones ( VBA) . Una de las funciones de VBA es generar los datos de la base de datos y guardarlos en un conjunto de registros que se puede acceder y manipular en el código. Una vez que haya terminado de trabajar con el conjunto de registros en el código, puede volver a guardarlo en la tabla que sacó de o copiarlo en otra tabla . Instrucciones
1
Abra su base de datos en Microsoft Access 2007 y abrir el Editor de Visual Basic . Haz clic en la pestaña " Herramientas de base de datos" y luego en " Visual Basic " de las " macros y código" del grupo.
2 Haga clic en la opción del menú " Insertar" en el Editor de Visual Basic y, a continuación , haga clic en "Módulo ". O , si usted tiene un formulario o módulo anterior que desee utilizar este procedimiento , abra que en vez de hacer doble clic en él desde la ventana Explorador de proyectos en el lado izquierdo de la pantalla.
3
Escriba el procedimiento que se tire el conjunto de registros de la base de datos :
"Sub RecordsetExample ()
dbTest Dim como base de datos ' la variable que contendrá la base de datos
< p > rsRecordset Dim como Recordset ' la variable que contendrá el conjunto de registros
Set dbTest = OpenDatabase ( " MyDatabase.mbd ")' Cambiar esta con el nombre de la base de datos
dbTest
conjunto rsRecordset = . OpenRecordset ( " Tabla1" , dbOpenTable ) ' Cambiar tabla 1 para el nombre de la tabla
End With "
4
Escriba el código para copiar el conjunto de registros en otra tabla . El código es el siguiente :
" SqlStatement dévil como secuencia
' La consulta para insertar en la tabla Tabla2 Cambiar a nombre de su mesa
SQLStatement = . " INSERT INTO Table2 VALORES " y rsRecordset
Aunque no rsRecordset.EOF
End With "
5
clic en el icono" Guardar " en el Editor de Visual Basic . Haga clic en el botón "Ejecutar (! )" Si desea ejecutar el procedimiento y copiar el conjunto de registros de la tabla actual . Si no es así , cierre el Editor de Visual Basic y haga clic en el botón "Office" y luego en " Guardar" para guardar los cambios en la base de datos .