День добрый!
Для главной работает

SysCmd(acSysCmdGetObjectState, acForm, strFormName)

Для подчиненной пишут что нужно проверять .Parent и если нет ошибки значит открыта.
как-то это имхо через левое ухо... А нет прямого способа проверить открытость подчиненной?

http://www.sql.ru/forum/1180335/kak-uznat-otkryta-li-podchinennaya-forma