Chargement de formulaire

Bonjour,

Dans un classeur, j'ai créé plusieurs formulaires du type Equipe1, Equipe2 etc...

Je veux charger ces formulaires à partir d'un autre formulaire via une boucle for next.

Le souci rencontré est que lorsque je tape le code

Load(Equipe & i).Show

il indique une erreur de compatibilité.

Est-ce une simple erreur de syntaxe ?

Merci d'avance

Bonsoir

Formulaire = Userform ?

Si oui

Sub test()
  For i = 1 To 2
    VBA.UserForms.Add("Equipe" & i).Show
  Next i
End Sub

Pourrais-je par la suite rajouter des contrôles par code ?

J'ai lu dans un post que pour les userforms créés dynamiquement, il n'est pas possible d'ajouter des controles.

Bonsoir

Dans le message précèdent je t'y ai mis un lien

Joshua a écrit :

J'ai lu dans un post que pour les userforms créés dynamiquement, il n'est pas possible d'ajouter des controles.

Je crois que tu as mal lu

Ce n'est pas évident à faire mais c'est possible

La calculette fonctionne

Je reprends ce post car j'ai toujours le même souci.

J'ai essayé avec la solution précédemment proposée :

Sub test()

For i = 1 To 2

VBA.UserForms.Add("Equipe" & i).Show

Next i

End Sub

Mais j'ai une erreur de type 5 argument ou appel de procédure incorrect.

Je rappelle que les formulaires que je veux appeler sont déjà créés et que le nombre qui sera appelé dépend d'une variable de 1 à 8 qui est défini dans un autre formulaire (toujours ouvert). Il n'ya que le chiffre de la fin qui change dans leur nom.

Si quelqu'un à une méthode, cela m'arrangerait beaucoup.

Bonjour

Cette méthode fonctionne

Si toujours soucis

Bon, cela ne marche toujours pas.

Ci joint un exemplaire simplifié.

Le code du lancement des formulaires se trouve dans CompoFA.

Si tu lances CompoFA, il faut renseigner deux champs.

D'avance merci

23test.zip (53.99 Ko)

Bonsoir

La méthode fonctionne mais il y a un problème avec l'ajout des contrôles

Et je ne sais pas

Je cherche mais si quelqu'un trouve la solution


EDIT 02:29 le 04/10/2011

Bonjour

J'ai cherché mais je n'ai pas de solution

Si une empirique

Répéter

Equipe1.show
Equipe2.show

Question : Quelle utilité ces Userform semblables ?

Ouverture un seul Userform avec un Indice qui traiterait les résultats différemment selon son numéro (à étudier)

style

If Indice = 1 Then 
' On fait ça
ElseIf Indice = 2 Then
' On fait ceci
etc...

Quelqu'un à peut-être une solution

A suivre

Je vais réfléchir à cette idée d'indice.

Pour l'instant j'exporte les données saisies sur une feuille de calcul, mais en fait, je pense plutôt alimenter un tableau de variables en 3 dimensions déclaré en Public. Une des dimensions pourrait être cet indice.

Je regarde tout cela.

Merci encore pour la recherche.

Et si d'autres personnes ont une solution...

Rechercher des sujets similaires à "chargement formulaire"