How to trim the fields name

[sabavno]

Hi,

When I import excel spreadsheet into Access, the fields names have blanks at the end
(e.g. [Invoice Number ])

How can I get rid of those blanks (using VBA)

Thanks.

 

[beetee]

use the trim() function.

dim FieldName as string
FieldName = trim(InputFieldName)

 

[sabavno]

Where do I put that? In my query?

 

[beetee]

I realize now that the answer I gave you was inappropriate.

To change the field names, you need to work with table defs.
Just off the top of my head (may have some compilation or logic errors, but it should get you started)

Dim MyDb as database
set mydb = currentdb

dim MyTDF as tabledef
set mytdf = mydb.tabledefs("TheTableWithExcelFields&quot

dim CurField as field
for each curfield in mytdf.fields
curfield.name = trim(curfield.name)
next curfield

set mytdf = nothing

set mydb = nothing