[VBA] Lancer une form à partir de son nom

Citation:

---

Envoyé par bbil

voir la méthode à CatBull un peu plus haut !!

---

J'apprécie votre aide et je vous en remercie. Mais ajouter à la volée les forms, ça m'arrange absolument pas :?

J'aimerai être sûr qu'on se trouve dans une impasse avant d'aller tronçonner mon source... :aie:

je voulais juste montrer que la propriété name existe et qu'une comparaison est possible avec une chaine de caractère ...

Code:

---

1 2 3 4 5 6 7 8

Public Sub masub() Load UserForm1   If (VBA.UserForms.Count >= 1) Then MsgBox VBA.UserForms(0).Name, vbkonly VBA.UserForms(0).Show End If End Sub

---

la c'est mieux ?

Citation:

---

Envoyé par truman

J'apprécie votre aide et je vous en remercie. Mais ajouter à la volée les forms, ça m'arrange absolument pas :?

J'aimerai être sûr qu'on se trouve dans une impasse avant d'aller tronçonner mon source... :aie:

---

ou tu as vu qu'on ajouté à la volée des forms ??

Citation:

---

Envoyé par aide en ligne VBA

La collection UserForms est l'ensemble des objets UserForm chargés dans une application

---

par contre, la valeur par défaut est "VbModal", si le userforms ne doit pas être chargé en modal, il faut ajouter derrière show vbModeless

C'est bon.

Code:

---

Userforms.Add(nom).Show

---

Ca fonctionne. Je pensais que Add créait une nouvelle form.

Merci.

Salut !

J'ai entamé une migration de mon appli vers VB6.
Quelqu'un sait comment faire la même chose en VB ? :aie:

Code:

---

Forms.Add(nom).Show

---

Ne fonctionne pas.

Merci.

La collection Forms tout comme UserForms contient les feuilles chargées de l'appli. Sauf qu'en VBA, elles sont toutes chargées au démarrage...


Ce qui suppose, qu'en VB, je fasse une boucle pour charger toutes mes forms au démarrage mais comment...

Tu connais le nom de tes forms...
donc tu peux les charger, si tu le veux (sans nécessairement les "montrer").

Citation:

---

Envoyé par jmfmarques

Tu connais le nom de tes forms...
donc tu peux les charger, si tu le veux (sans nécessairement les "montrer").

---

Salut.
Non car mon appli permet la création dynamique de forms. Donc je ne sais pas ce qu'elle contient au lancement.

Ceci ne marche pas et je crois savoir pourquoi.

Code:

---

1 2 3 4 5

Dim name As String Dim frm As Form name = "frm_test" Set frm = Forms.Add(name) frm.Show

---

Effectuant une migration de VBA vers VB, mes forms (concepteurs) ne feraient pas partis de la collection Forms ??? Dans ce cas, y aurait-il un moyen de les "convertir" en feuilles ? A moins qu'il n'y ait une collection particulière pour les design forms ?