Saber como renomear colunas no Microsoft Access usando o Visual Basic for Applications (VBA ) pode ajudá-lo a evitar a perda de dados. Access é um sistema de gerenciamento de banco de dados relacional . Você não precisa excluir a coluna e criar um novo para renomear um campo usando VBA. Não ter que excluir colunas é importante quando você está lidando com dados críticos. Também é importante lembrar-se de fazer backup de seu banco de dados antes de fazer quaisquer alterações. Instruções
1

Comece Access 2007, selecione "Ferramentas " e clique em Banco de Dados

Digite o seguinte para criar um novo sub " Visual Basic ". :

Sub renameColumns ()

Pressione " Enter".
2

Digite o seguinte para declarar sua " cadeia" e " banco de dados" variável :

Dim SQLString as String < br >

Dim dbs as Database
3

Digite o seguinte para criar uma nova tabela chamada " myTable " e dois campos:

SQLString = " CREATE TABLE MyTable ( PrimeiroNome TEXT ( 25) , sobrenome TEXT ( 25) ); "

DoCmd.RunSQL ( SQLString )
4

Digite o seguinte para renomear os campos em " myTable : "< br >

dbs.TableDefs ( " myTable " ) . Fields ( " Nome" ) . Name = " FName "

dbs.TableDefs ( " myTable " ) . Fields ( "Sobrenome" ) . Name = " LName "

Clique dentro de sua " renameColumns " sub e pressione" F5 " para executá-lo .