Seeking A97 code snippet to programatically delete table field decriptions

[MLH]

In design view, say you habitually type descriptions for each of
the table fields you create. After many moons, many many tables
and many many many fields - you wanna delete each and every
table field description. Can that be done somehow using the
tables collection and the fields collection??? Any resource you
care to point out will be greatly appreciated.

[Allen Browne]

You can:
- Loop through the TableDefs collection.
- Loop through the Fields collection in each TableDef.
- Use the Delete method on the Properties of the Field.

The basic reference is:
dbEngine(0)(0).TableDefs("MyTable").Fields("MyFiel d").Properties.Delete
"Description"

Use error handling: you will get an error (3270 from memory) if the field
has no Description.

For an example of looping the Fieldds of a TableDef and refering to the
Description property, see:
http://allenbrowne.com/func-06.html

--
Allen Browne - Microsoft MVP. Perth, Western Australia.
Tips for Access users - http://allenbrowne.com/tips.html
Reply to group, rather than allenbrowne at mvps dot org.

"MLH" <CR**@NorthState.net> wrote in message
news:1q********************************@4ax.com...

In design view, say you habitually type descriptions for each of
the table fields you create. After many moons, many many tables
and many many many fields - you wanna delete each and every
table field description. Can that be done somehow using the
tables collection and the fields collection??? Any resource you
care to point out will be greatly appreciated.

[MLH]

That was a quick reply. Many thx, Allen. Will check
out your site momentarily.
xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx xx

You can:
- Loop through the TableDefs collection.
- Loop through the Fields collection in each TableDef.
- Use the Delete method on the Properties of the Field.

The basic reference is:
dbEngine(0)(0).TableDefs("MyTable").Fields("MyFie ld").Properties.Delete
"Description"

Use error handling: you will get an error (3270 from memory) if the field
has no Description.

For an example of looping the Fieldds of a TableDef and refering to the
Description property, see:
http://allenbrowne.com/func-06.html