The simplest way to do that is to extend the method I showed, just looping thru the form objects, eg:
Code:
Dim frm as Form
  For Each frm In Forms
    frm.DoSomething
  Next
edit: beaten to it, but at least I showed a different style!