Cómo cambiar el nombre de 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 sus datos. El acceso es un sistema de gestión de base de datos relacional. No es necesario eliminar la columna y crear una nueva para cambiar el nombre de un campo usando VBA. No tener que eliminar columnas es importante cuando se trata de datos críticos. Es también importante recordar que la copia de seguridad base de datos antes de hacer cualquier cambio.

Instrucciones

1 Inicie Access 2007, seleccione "Herramientas de base de datos" y haga clic en "Visual Basic".

Escribe lo siguiente para crear un nuevo sub:

renameColumns sub ()

Presione ENTRAR."

2 Escribe lo siguiente para declarar su "cadena" y la variable "base de datos":

Dim como secuencia sqlString

DBS dévil como Base de Datos

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

sqlString = "CREATE TABLE myTable (TEXTO FirstName (25), Apellido TEXTO (25));"

DoCmd.RunSQL (sqlString)

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

dbs.TableDefs ( "myTable"). Los campos ( "Nombre"). Name = "FName"

dbs.TableDefs ( "myTable"). Los campos ( "Apellido"). Name = "LName"

Haga clic dentro de su "renameColumns" sub y pulse la tecla "F5" para ejecutarlo.