get number of fields in a table?

[j.finlay]

Folks,
Once you have created a table, by importing, etc, is there anyway to
easily look up how many fields are in it? Counting in the design view
or table view is not very accurate.

Tx
Judith

[Rick Brandt]

j.******@cox.net wrote:

Folks,
Once you have created a table, by importing, etc, is there anyway to
easily look up how many fields are in it? Counting in the design view
or table view is not very accurate.

Tx
Judith

Press Ctl-G to bring up the VBA immediate window and type...

?CurrentDB.TableDefs("TableName").Fields.Count <Enter>
--
Rick Brandt, Microsoft Access MVP
Email (as appropriate) to...
RBrandt at Hunter dot com

[j.finlay]

Rick, Thanks, you got my question right but I tried it and it didn't
work. Is there a point and click solution? It will be hard for me to
remember this one even if I can get it to work. I'm not too VBA
literate.

Tx
Judith
Rick Brandt wrote:

j.******@cox.net wrote:

Folks,
Once you have created a table, by importing, etc, is there anyway to
easily look up how many fields are in it? Counting in the design view
or table view is not very accurate.

Tx
Judith

Press Ctl-G to bring up the VBA immediate window and type...

?CurrentDB.TableDefs("TableName").Fields.Count <Enter>
--
Rick Brandt, Microsoft Access MVP
Email (as appropriate) to...
RBrandt at Hunter dot com

[Rick Brandt]

j.******@cox.net wrote:

Rick, Thanks, you got my question right but I tried it and it didn't
work. Is there a point and click solution? It will be hard for me to
remember this one even if I can get it to work. I'm not too VBA
literate.

Well it sounded like you wanted a one-time way to get the field count, not
something that you would use over and over. If you want that then you need to
build a custom function that takes a table name as an argument and returns the
field count.

Put the following in a standard module...

Function FieldCount(TableName As String) As Byte
FieldCount = CurrentDb.TableDefs(TableName).Fields.Count
End Function

....then to get the field count of any table...

=FieldCount("TableName")
--
Rick Brandt, Microsoft Access MVP
Email (as appropriate) to...
RBrandt at Hunter dot com