Logo GNT
Actualités Tests & Guides Bons Plans
Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11
Entraide Applications Microsoft Office Excel UserForm chargé ?

UserForm chargé ?

2 réponses
Avatar
Patrick
Bnojour,

En VBA, y a-t-il un moyen de savoir si un UserForm est chargé et/ou affiché ?

Merci.

--
Patrick
Signaler un problème avec ce contenu

2 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
Michel Pierron
Bonjour Patrick;
Par exemple:

Private Function FormIsLoaded(UFName$) As Boolean
Dim UF%
For UF = 0 To VBA.UserForms.Count - 1
FormIsLoaded = UserForms(UF).Name = UFName
If FormIsLoaded Then Exit Function
Next UF
End Function

Sub Test()
Load UserForm1
MsgBox FormIsLoaded("UserForm1"), 64
If FormIsLoaded("UserForm1") Then Unload UserForm1
End Sub

MP

"Patrick" a écrit dans le message de
news:
Bnojour,

En VBA, y a-t-il un moyen de savoir si un UserForm est chargé et/ou
affiché ?

Merci.

--
Patrick



Avatar
Patrick
Merci.

--
Patrick


"Michel Pierron" wrote:

Bonjour Patrick;
Par exemple:

Private Function FormIsLoaded(UFName$) As Boolean
Dim UF%
For UF = 0 To VBA.UserForms.Count - 1
FormIsLoaded = UserForms(UF).Name = UFName
If FormIsLoaded Then Exit Function
Next UF
End Function

Sub Test()
Load UserForm1
MsgBox FormIsLoaded("UserForm1"), 64
If FormIsLoaded("UserForm1") Then Unload UserForm1
End Sub

MP

"Patrick" a écrit dans le message de
news:
Bnojour,

En VBA, y a-t-il un moyen de savoir si un UserForm est chargé et/ou
affiché ?

Merci.

--
Patrick