Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

Register Log in
  • Congratulations SkipVought on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

Count of columns/fields in a query or table.

Status
Not open for further replies.
weightinwildcat

weightinwildcat

Programmer
May 11, 2010
84
0
0
US
Here is a quick question. If I run a query or open a table, how do I get a count of the number of fields, as opposed to the number of records?
 
Sort by date Sort by votes
msgbox NumberFields("MyTable")

Public Function NumberFields(Domain As String) As Integer
Dim rs As DAO.Recordset
Set rs = CurrentDb.OpenRecordset(Domain)
NumberFields = rs.Fields.Count
End Function
 
Upvote 0 Downvote
Status
Not open for further replies.

Similar threads

OCM
  • Question
Populate access table from excel
Replies
6
Views
224
OCM
OCM
TheresAlwaysAWay
  • Locked
  • Question
How can I make Access display a + sign in front of positive integers, just as it does - for neg? 2
Replies
8
Views
175
TheresAlwaysAWay
TheresAlwaysAWay
PizMac
  • Locked
  • Question
error 3027 database or object is read-only
Replies
5
Views
112
PizMac
PizMac
atadbitslow
  • Locked
  • Question
comparing fields, one populated with data and one blank 2
Replies
8
Views
127
atadbitslow
atadbitslow
TheresAlwaysAWay
  • Locked
  • Question
Delete query takes FOREVER to run 1
Replies
11
Views
92
jedraw
jedraw

Part and Inventory Search

Sponsor

Back
Top