Hi,

To begin, you can have a look to Access he searching for the keyword "fields". You'll find that "fields" is the name for any table list of fields (we name that a "collection)). This collection has an attribute (named a property), Count.

So you could write a sub like this

'db is you database variable

dim db as database
set db = dbengine.databases(0) 'the current database

for i = 0 to db.tabledef("YourTable").fields.count - 1
if isnull(tabledef("YourTable").fields(i)) then
tabledef("YourTable").fields(i) = tabledef("YourTable").fields(i - 1)
'be careful to i = 0
end if
next i

See what I mean ?
Bye