Conocer cómo guardar la información de una tabla a otra tabla le puede ahorrar tiempo en la transferencia de datos en una base de datos. Microsoft Office Access es un sistema de gestión de base de datos relacional incluido en la suite de Microsoft Office. Visual Basic para Aplicaciones ( VBA) es un lenguaje de programación desarrollado por Microsoft . VBA se puede utilizar en el acceso a automatizar los procesos de lo contrario realizados manualmente . En pocos pasos se puede escribir código VBA para consultar datos de una tabla y guardarla en otra tabla. Instrucciones
1
Inicio Microsoft Office Access 2007 y seleccione "Base de datos en blanco ", y luego haga clic en " Crear". Haga clic en " Herramientas de base de datos ", seleccione "Basic . Visual "
2 Haga clic en el campo " Insertar" y seleccione " Módulo ".
Copia y pega el siguiente código en el módulo :
createNewTable Sub Private ()
rst As Recordset
db As Database
sqlstr dévil como secuencia
sqlstr = "CREATE TABLE CustomerInfo ( TEXTO Nombre ( 25 ) , TEXTO Apellidos ( 25 )); "
DoCmd.RunSQL ( sqlstr )
sqlstr = "INSERT INTO CustomerInfo ( [ Nombre] , [Apellidos ] ) "
sqlstr = sqlstr &" VALUES ( 'John ', ' Williams '); "
DoCmd.SetWarnings False
DoCmd.RunSQL ( sqlstr ) < br >
sqlstr = "INSERT INTO CustomerInfo ( [ Nombre] , [ Apellidos] ) "
sqlstr = sqlstr & " VALUES ( 'Charles ', ' González '); "
DoCmd . EstablecerAdvertencias False
DoCmd.RunSQL ( sqlstr )
sqlstr = " CustomerInfo.FirstName SELECT "
sqlstr = sqlstr & " CustomerInfo.LastName EN CharlesInfo "
sqlstr = sqlstr y "FROM CustomerInfo "
sqlstr = sqlstr & " WHERE ( ( ( CustomerInfo.FirstName ) = ' Charles ')) ; "
DoCmd.SetWarnings False < br >
DoCmd.RunSQL ( sqlstr )
End Sub
3 Pulse
"F5 " para ejecutar la subrutina . El código creará una nueva tabla y agregue dos nuevos registros de datos. Una nueva tabla se creará en " Nombre" es igual a " Charles ".