Number of rows?

Topic

New Reply

How can I determine the maximum number of rows in a table in Access 2000 using VBA?

James

Reply | Quote

Replies

I don’t think there is a “maximum number of rows”. You are limited by file size (2GB in Access 2000).

If you mean “current number of rows”, I think you have to open a recordset based on the table, move to the end, and look at the recordcount property.

Jeremy

Reply | Quote

Are you looking for the number of records or the table limit? If the former, you can use this:

Public Function TableRecords(ByVal strTblName As String)
  Dim dbs As DAO.Database
  Dim tdf As DAO.TableDef
  
  Set dbs = CurrentDb
  Set tdf = dbs.tabledefs(strTblName)
  TableRecords = tdf.RecordCount
  Set tdf = Nothing
  Set dbs = Nothing
End Function

Reply | Quote

I’m looking for the number of records.

Thanks for the help!

James

Reply | Quote