Change the name of a Field in an Access Table

[Per_]

Hello,

I have two questions:

1) Is it possible to change the name of a field in an access table from Excel?
2) Is it possible to add description for a field in an access table from Excel?

Thanks
/P

 

[Trevor G]

I would ask first why do you want to change the field name? is the Table connected to queries, forms and reports where it would have a major implication to the whole database.

 

[Per_]

I'm creating the two tables from an CSV and I need to keep a table with old names. So I would like to change the names. The CSV files is not static with the number of colums.

Are there away to change the fieled names?

 

[Trevor G]

You will need to set the Reference in Excel VBA Screen to use Microsoft Access. As you aren't indicating which version of Microsoft you will have to search the list to set the reference.

Sub ChangeFieldName()
'Set Reference to use Microsoft Access
'Tap Tools and References
'Search the list for Microsoft Access XX - Version number

Dim appAccess As Access.Application
Set appAccess = New Access.Application
With appAccess
'Change the path to the Database location and database name
    .OpenCurrentDatabase "C:\Documents\DatabaseNamee.mdb" 'Using mdb if later version of access change to accdb
    .CurrentDb.TableDefs("tblCheck").Fields(1).Name = "ChangeName" 'Which table and field and change name to ChangeName
    .CloseCurrentDatabase 'Close Database
End With
End Sub

 

[Per_]

Thank you very very very much Trevor! I appreciate the help very much!

Do you know how to add the description for the field as well?

 

[Trevor G]

I haven't dealt with the descriptions before. Take a look at this past thread to see if it helps:

Add Table/Field Descriptions with VBA

I am defining tables and their fields in code and appending them to my database. Is there a way to add table and field descriptions also through code?

www.mrexcel.com

 

[Per_]

Thanks Trevor for the link. I can not get it to work