ник: osmor
dcount считает только в таблице или сохраненном запросе.
Но запрос вида "SELECT * FROM Table" вполне можно заменить именем таблицы т.е.
nz(DCount("*", ПеременнаяСИменемТаблицы),0)
т.е.
Public Function mydcount(strtblName As String) As Long
mydcount = Nz(DCount("*", strtblName))
End Function
в поле формы в свойстве данные пишите:
=mydcount("Таблица1")
в другом поле
=mydcount("Таблица2")
и т.д.