Bon finalement après quelques tests, cette fonction me pose quelques problèmes.
Si la fenêtre que je teste est effectivement ouverte alors pas de problème. Mais si elle ne l'est pas, d'une part, VB considère que Userform1.Visible est un '<variable objet ou variable de bloc With non défini>'
Cela ne plante pas mais VB rentre alors dans le code Initialize de ce userform et là, il n'aime pas!
La seule solution que j'ai trouvé est de créer une variable plublic dans un module. Ex: usfMaFeuillevisible as Boolean
ensuite il faut l'initialiser à true dans l'évènement initialize ou Activate du userform: usfMafeuilleVisible=true et de la mettre sur False à la fermeture du UserForm.