Mettre en mémoire une UserForm

[Claude Azoulai]

Bonjour à tous

Voici mon problème.
J'ai besoin de rendre invisible une UserForm (UserForm.hide) qui peut être n'importe laquelle de mon application (pour libérer l'écran).
Je veux mémoriser dans une variable, le nom (ou autre chose) de cette Form pour que je puisse la réafficher par une commande appropriée dans laquelle je ne dois utiliser que cette variable.

Quelqu'un a-t-il une idée.
Merci de votre réponse

Claude Azoulai

 

[Pierrot93]

Re : Mettre en mémoire une UserForm

Bonjour Claude Azoulai

A mon avis le code ci dessous devrait suffire :

    UserForm1.Show

Bonne fin de journée.
@+

 

[Robert]

Re : Mettre en mémoire une UserForm

Bonjour Claude, Pierrot, bonjour le forum,

Si tu as un seul userform de caché, et quel que soit son nom, utilise alors la collection UserForms qui renvoie tous les Userforms chargés.

UserForms(0).Show

Affiche le premier de tous les Userform chargés. Comme c'est le seul ça devrait coller.

 

[Hervé]

Re : Mettre en mémoire une UserForm

bonjour 🙂


une autre syntaxe :

Dim monuserform As String

monuserform = "Userform1"

VBA.UserForms.Add(monuserform).Show

salut

 

[myDearFriend!]

Re : Mettre en mémoire une UserForm

Bonsoir Claude Azoulai, Pierrot93, Robert, Hervé, le Forum,

Une autre façon peut-être de voir les choses ou de les appliquer :

[SIZE=2][COLOR=GRAY][B][I]DANS UN MODULE DE CODE STANDARD[/I][/B][/COLOR]

[COLOR=NAVY]Option Explicit[/COLOR]

[COLOR=GREEN]'Une variable déclarée "public" en entête de module standard[/COLOR]
[COLOR=NAVY]Public[/COLOR] USF [COLOR=NAVY]As Object[/COLOR]

[COLOR=GREEN]'Lorsque tu affiches ton Userform pour la première fois[/COLOR]
[COLOR=NAVY]Sub[/COLOR] Test()
    [COLOR=GREEN]'Tu définies la variable publique "USF"[/COLOR]
    [COLOR=NAVY]Set[/COLOR] USF = UserForm2
    USF.Show
[COLOR=NAVY]End Sub[/COLOR]
[/SIZE]

Puis, n'importe où dans ton code tu peux cacher le USF avec :

[SIZE=2]    USF.Hide[/SIZE]

Et n'importe où dans ton code tu peux le réafficher avec :

[SIZE=2]    USF.Show
[/SIZE]

Perso, j'aime beaucoup la proposition de Robert, simple mais efficace.

Cordialement,