apri la connessione al DB, selezioni tutto dalla tabella che ti interessa, e conti quanti sono i record.

dim TotaleRecord as long
SELECT * FROM TAB1
TotaleRecord= record.recordcount


poi ti colleghi alla tabella2 e scrivi il valore di TotaleRecord.

SELECT * FROM TAB2
record.fields("NomeColonna")= TotaleRecord