Hola, logré mostrar todas las ventanas que están abiertas. Lo que no he podido hacer es obtener cuál es la ventana activa (la que tiene el foco).
 
Esto hice:  
Código:
 Dim i As Byte
For i = 0 To Forms.Count - 1
 MsgBox Forms(i).Caption 
Next
  Gracias desde ya por las respuestas.
Saludos