Discussion :

[truman]

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...

[bhaal76]

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

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

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 ?

[SfJ5Rpw8]

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...

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

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

[bhaal76]

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

[truman]

C'est bon.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Userforms.Add(nom).Show

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

Merci.

[truman]

Salut !

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

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Forms.Add(nom).Show

Ne fonctionne pas.

Merci.

[truman]

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...

[jmfmarques]

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

[truman]

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 :

Sélectionner tout - Visualiser dans une fenêtre à part

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 ?