Pb de module qui ne marche plus sur vista !

Bonjour,

J'ai besoin de votre aide s'il vous plait:

Voilà j'ai développé une appli sur ACCESS 2003 que je transfert sur les autres postes par l'intermédiaire d'un runtime.
Jusqu'à maintenant les postes étaient sur XP ms maintenant qu ils sont sur Vista, j'ai des problèmes d'interprétation de module.

Le principal qui me pose problème est celui qui me permet de vérifier si un formulaire est ouvert comme condition pour pouvoir executer une action. A l'origine je l'avais créer comme ca :

Function estformulairecharge()

End Function

Function EstFormulaireChargé(NomFormulaire)
EstFormulaireChargé = False
For I = 0 To Forms.Count - 1
If Forms(I).FormName = NomFormulaire Then
EstFormulaireChargé = True
Exit For
End If
Next I
End Function


Savez vous quelle modif dois je faire pour qu il fonctionne sur tte version?

Merci d'avance pour votre aide


Mu