Cómo guardar los datos filtrados a otra tabla en Access

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 )

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

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 ".