Cómo cambiar el tipo de datos con un acceso Macro

Microsoft de acceso integrado en el entorno de programación Visual Basic para Aplicaciones o VBA , permite a los usuarios realizar cualquiera de las operaciones de datos disponibles en la interfaz de usuario estándar de acceso . Estas operaciones incluyen las consultas SQL que modifican el tipo de datos de una columna de la tabla , como el de número entero en el texto . Acceso usuarios pueden tomar varios enfoques para cambiar el tipo de datos de un campo con VBA. Cambio de los tipos de campo con macros VBA se puede hacer en unos pocos pasos sencillos. Instrucciones
1

Abra Microsoft Access , a continuación, empezar a crear una tabla de datos de ejemplo , haga clic en la opción " Crear" del menú "Tabla " . Vamos a usar VBA para cambiar el tipo de un campo de datos en esta tabla.
2

tipo " libro " en la celda superior de la segunda columna, en la ventana de cuadrícula de la tabla abierta en el paso 1 . Tipo " Precio " en la celda a la derecha de la celda " libro " .

3 Escriba un nombre libro en la primera celda bajo la columna "Libros " la partida , y escriba una muestra precio en la primera celda bajo la columna de "Precio" . Al escribir el número tenga acceso automáticamente a definir la columna " Precio " como no es de texto , el campo numérico.
4

Press "Control - S ", a continuación, introduzca " Booktable " para dar ese nombre a la muestra datos.
5

Haga clic en la ficha " Booktable " y seleccione " vista de diseño . " El " precio" fila de la cuadrícula que aparece mostrará " Número ". Esto indica que el campo "Precio" es un valor numérico , no el texto , el campo . Cierre la pestaña , haga clic en él y haga clic en "Cerrar".
6

Pulse " Alt -F11 " para entrar en la ventana de codificación para macros VBA. Haga clic en opción " Módulo " del menú "Insertar " para insertar un nuevo módulo o ventana para introducir el programa de campo que cambia .
7

Pega el siguiente programa en el módulo. Declaración " Ejecutar" de este programa se ejecuta un comando SQL , " ALTER TABLE " en los datos " Booktable " . Este comando cambia el tipo de campo del campo " Precio " de numérico en texto .

Public Sub ChangeDataType ()

Dim dbase Como DAO.Database

Set dbase = CurrentDb

dbase.Execute ( " ALTER TABLE ALTER COLUMN Booktable [precio ] Texto ( 25 ) ;")

End Sub
8

Ejecute el programa haciendo clic en uno de sus declaraciones y haciendo clic comando "Ejecutar " del menú " Ejecutar" .
9

Volver al acceso con la tecla " Alt -F11 , " volver a mostrar la vista de diseño de los datos " Booktable " por siguiendo las instrucciones paso de 5 . El " precio" fila ahora muestra "Texto " en lugar de " Número ".