prova questa routine. Nella finestra immediata ti visualizza tutto quello che puoi desiderare.
sostituisci alla tabella "TUATABELLA" il nome della tua tabella del DB.
Credo riuscirai a modificare il tutto per estrarre solo i dati che ti interessano ed eventualmente a depositarli in una variabile Public.
mau

-----
Sub informazioni()
Dim dbs As Database, ctr As Container, doc As Document
Dim intI As Integer
Dim strTabChar As String
Dim prp As DAO.Property

Set dbs = CurrentDb
strTabChar = vbTab
' Set Container object variable.
Set ctr = dbs.Containers("Tables")
' Set Document object variable.
Set doc = ctr.Documents("movcassa")
doc.Properties.Refresh
' Print the object name to Debug window.
Debug.Print doc.Name
' Print each Object property to Debug window.
For Each prp In doc.Properties
Debug.Print strTabChar & prp.Name & " = " & prp.Value
Next

End Sub
-------