Cómo cambiar el nombre de las columnas en VBA y Acceso

Saber cómo cambiar el nombre de las columnas en Microsoft Access utilizando Visual Basic para Aplicaciones ( VBA) puede ayudar a evitar la pérdida de los datos. El acceso es un sistema de gestión de base de datos relacional . No es necesario para eliminar la columna y crear uno nuevo para cambiar el nombre de un campo utilizando VBA. No tener que eliminar columnas es importante cuando usted está tratando con datos críticos. También es importante tener en cuenta para hacer una copia de base de datos antes de realizar cambios . Instrucciones
1

Inicie Access 2007 , seleccione " Herramientas de base de datos " y haga clic

Escriba el siguiente para crear un nuevo sub " Visual Basic ". :

RenameColumns Sub ()

Pulse " Enter".
2

Escriba el siguiente para declarar su " cadena" y "base de datos " Variable :

SQLString Dim As String

Dim dbs como base de datos
3

Escriba lo siguiente para crear una nueva tabla llamada " myTable " y dos campos :

SQLString = " CREATE TABLE myTable ( TEXTO Nombre ( 25 ) , TEXTO Apellidos ( 25 )); "

DoCmd.RunSQL ( SqlString )
4

Escriba lo siguiente para cambiar el nombre de los campos en " myTable : "

dbs.TableDefs ( " myTable ") . campos ( " Nombre" ) . Name = " fname "
dbs.TableDefs

( " myTable ") . campos ( " Apellido" ) . Name = " LName "

Haga clic dentro de las " sub renameColumns " y presione" F5 " para ejecutarlo.