ник: Анатолий (Киев)
Выполняете цикл по элементам формы, проверяете ControlType каждого, если acSubform - получаете ссылку на подчиненную форму (например set sfrm = Me.Controls("Имя").Form).
Это нужно оформить в виде процедуры получающей ссылку на форму и объект Collection, в который добавлять найденные объекты Form и для каждого вызывать эту процедуру рекурсивно.