質問: false then msgbox strform & "は存在しません" end if end sub のような感じで、すべてのフォームをループしているのですが 無駄が多い気がします。 改善策があればお願いします。
回答: dcount("*" ,"msysobjects","type = -32768 and name = 'チェックしたいフォーム名'") では。 http://www.nurs.or.jp/~ppoy/access/access/acq017.html ↑解説はこちらにて。