Travailler avec deux UserForms

Bonjour a toutes et tous, Forum

Je souhaiterai svp savoir si il est possible de travailler avec deux UserForms ouvertes et simultanément.

Ex: Une Userform1 ouverte et une autre en dessous cliquer dans l'une ou l'autre
sans que l'une ou l'autre ne disparaisse en dessous.

et quelles soient toutes les deux actives.

Merci a vous et Bonne après midi

Cdlt Raymond

Bonjour Raymond, re le forum,

exemple c-joint avec le peu de renseignement :
2 USF "ShowModal = False" pour les deux et instruction "Left" dans les évènements "Activate" respectifs

PS : Attention à la taille de tes USF, il est évident que
si USF1 = taille de la page => USF2 disparait
si USF2 = taille de la page => USF1 recouvert

Salut Casefayere,

Merci pour le petit fichier c'est sympa,

c'est presque ça, par contre je ne veux pas que lorsque que j'écris dans une UF que ça écrive dans l'autre et inversement

et que les UF reste stable car dans exemple dès que tu clic elle ont la bougeotte ou peur LOL

PS pas mis plus d'infos vu que je cherche a savoir si c'est jouable de bosser avec deux Usfs avant que je commence mon fichier.

merci de ton aide et le chti fichier, bonne fin de dimanche

Cdlt Raymond

Citation:

---

...par contre je ne veux pas que lorsque que j'écris dans une UF que ça écrive dans l'autre et inversement

---

Ce n'était qu'un exemple, ne te fies qu'à leur placement sur lequel, d'ailleurs, tu pourras intervenir

Citation:

---

car dans exemple dès que tu clic elle ont la bougeotte ou peur LOL

---

Pas chez moi

Bonsoir Casefayere

J'ai mis Uf1 a gauche Uf2 juste a droite de Uf1 placer au milieu de l'écran environ

je clic sur Uf1 et je clic sur Uf2

et Uf2 passe sur la moitié de Uf1

après c'est le bazar

mais bon ce n'ai qu'un exemple je comprends bien

que peut'on faire pour obtenir comme je souhaitai svp

Merci beaucoup a toi et bonne soirée

Cdlt Raymond

Citation:

---

J'ai mis Uf1 a gauche Uf2 juste a droite de Uf1 placer au milieu de l'écran environ

---

comment as-tu fait, à la main ? par programmation ?

as-tu fait comme je le préconisais dans l'évènement "Activate" de chaque USF ?

Re Dominique

Je n'ai pas encore toucher au code , donc fait a la main

Code:

---

Private Sub UserForm_Activate()

---

pour activate rester pareil que tu a mis dans le code

Merci bonne soirée a toi bon app

Cdlt Raymond

Citation:

---

Je n'ai pas encore toucher au code , donc fait a la main

---

donc, c'est normal que tu finisses avec "un bazar"
il faut prévoir, pour chaque USF, une place qui ne te dérangera pas, que tu n'aies pas à les déplacer manuellement, tout ça dans les propriétés Left, Top ou Width

Bonsoir,
comme tu me l'as demandé, tu crées 2 userforms, le premier nommé, pourquoi pas USF1, le second USF2

dans leur fenêtre propriété, et pas par code, tu cherches "ShowModal" dont tu mets la valeur à False

tu cliques sur le code de USF1 et dans l'évènement "Activate", tu recopies ce code

Code:

---

1 2 3

Private Sub UserForm_Activate() Me.Top = 0: Me.Left = 0 End Sub

---

tu cliques sur le code de USF2 et dans l'évènement "Activate", tu recopies ce code

Code:

---

1 2 3

Private Sub UserForm_Activate() Me.Top = USF1.Height: Me.Left = 0 End Sub

---

Sur ta feuille, crées un bouton et donnes-lui ce code :

Code:

---

1 2 3 4

Private Sub CommandButton1_Click() Load USF1: USF1.Show Load USF2: USF2.Show End Sub

---

Après, à toi d'agencer tes USF

J'ai encore essayé et ça fonctionne

Bonne soirée

Bonjour a tous, forum

Bonjour Dominique,

Merci pour les codes, j'ai fait les essais ça fonctionne également chez moi

je vais pouvoir avancer sur mon programme

Je te souhaite une excellente journée et encore merci pour ton aide

A plus tard sans doute

Cordialement :ccool:

Raymond