Fermer ouvrir userform

Je n'ai pas réussi à appeler un userform d'un autre
fichier...
Cela dit, je ne vois pas les conflits qui pourraient
intervenir bien qu'évidemment, je n'ai pas ton code sous
les yeux !
Avec l'exemple que je t'ai donné tout à l'heure, tu
pourras transférer tous tes modules comme le userform
(avec l'export-import).

mais apparement ca rentre en conflit avec le "with
a.prject" si on mets un autre workbooks dedans...

Alors là, ça ne risque pas... Le with est un raccourci qui
permet de ne pas répéter ce texte. C'est un peu comme si
on déclarait une variable dont le nom serait vide. D'où
le . devant les insertlines !

A+

-----Message d'origine-----
Oui c'est bien ce que je pensais aussi...
Le problème c'est que mon Userform fait appel à des
macros

présentes dans le premier workbooks...Donc de deux choses
l'une, ou je déplace toutes les fonctions dans le
deuxieme

workbook (mais je crains des conflits) ou alors je me
demande s'il y a pas moyen de dire à la SUB qu'elle ouvre
le userform qui se trouve dans le workbooks1...

je pensais à
With a.VBProject.VBComponents( _
Worksheets("Header").CodeName).CodeModule
.InsertLines 1, "End Sub"
.InsertLines 1, "workbooks("accueil").UserForm1.Show"
.InsertLines 1, "Private Sub Worksheet_Desactivate()"
.InsertLines 1, ""
.InsertLines 1, "End Sub"
.InsertLines 1, "workbooks("accueil").UserForm1.Hide"
.InsertLines 1, "Private Sub Worksheet_Activate()"
End With
mais apparement ca rentre en conflit avec le "with
a.prject" si on mets un autre workbooks dedans...

C'est la lutte...

Bonjour.

Pour appeler un UserForm d'un autre fichier :
Classeur1 contient le UserForm.
Classeur2 affiche le UserForm.
Classeur1 sera automatiquement ouvert en même temps que Classeur2.
Dans Classeur1 ajouter un module avec cette Sub
Sub OuvreUF()
NomduUserForm.Show
End Sub
Dans Classeur2 ajouter une reférence a Classeur1.
Appeler le UserForm avec cette Sub
Sub AffichUF()
NomduVbaProjectdeClasseur1.OuvreUF
End Sub

Alain CROS.

"Vincent." <vincent.N0SP@MfallasATfr.pwc.com> a écrit dans le message de news: 802e01c3b4d8$02c0ef00$a601280a@phx.gbl...
Je n'ai pas réussi à appeler un userform d'un autre
fichier...

SA MARCHEEEEEEEEEEEEEEEEEEEEEEEEEEEE
YEEEEEEEEEEESSSSSSSSSSS
YEEEEESSSSSSSSSSSSSSSSS
YESSSSSSSSSSSSSSSSSS

MERCI TOUT LE MONDE POUR AUTANT DE PATIENCE ET DE
CLAIRVOYANCE parce que c'était pas super facile a
comprendre!!!!

merci merci et encore merci ;)

Ca, pour une nouvelle, c'est une BONNE nouvelle !!!
De rien, ce fut un plaisir...
En plus, c'était assez amusant à construire comme code ;-))
A+

V.

-----Message d'origine-----
SA MARCHEEEEEEEEEEEEEEEEEEEEEEEEEEEE
YEEEEEEEEEEESSSSSSSSSSS
YEEEEESSSSSSSSSSSSSSSSS
YESSSSSSSSSSSSSSSSSS

MERCI TOUT LE MONDE POUR AUTANT DE PATIENCE ET DE
CLAIRVOYANCE parce que c'était pas super facile a
comprendre!!!!

merci merci et encore merci ;)
.

Bonjour !
Bien vu !!! Je n'avais pas du tout cherché dans cette
voilà, et j'espère que je saurai y penser le jour venu où
cela me sera utile !
Et de la même façon, pour la cacher, il suffit de mettre
dans le classeur 1 un sub HideUserForm...
Evidemment ! Tout s'éclaire. C'est beaucoup moins bourrin
que ma méthode.
Merci donc pour cette judicieuse intervention !
^^
A+

V.

-----Message d'origine-----
Bonjour.

Pour appeler un UserForm d'un autre fichier :
Classeur1 contient le UserForm.
Classeur2 affiche le UserForm.
Classeur1 sera automatiquement ouvert en même temps que
Classeur2.

Dans Classeur1 ajouter un module avec cette Sub
Sub OuvreUF()
NomduUserForm.Show
End Sub
Dans Classeur2 ajouter une reférence a Classeur1.
Appeler le UserForm avec cette Sub
Sub AffichUF()
NomduVbaProjectdeClasseur1.OuvreUF
End Sub

Alain CROS.

"Vincent." <vincent.N0SP@MfallasATfr.pwc.com> a écrit
dans le message de news: 802e01c3b4d8$02c0ef00

$a601280a@phx.gbl...

Je n'ai pas réussi à appeler un userform d'un autre
fichier...


.