OVH Cloud OVH Cloud

Deux UserForm le Second alimentant le Premier

4 réponses
Avatar
Alex
Bonsoir =E0 tous,

Encore un probl=E8me de userform... mais cette fois pas un ! mes deux
userforms. Le second (AUTSITE) alimentant le premier (BASE). Sur le
Premier Userform, une selectcase, si coch=E9e alors le second Userform
apparait avec des textbox =E0 compl=E9ter, et un bouton Ok pour valider.
Je voudrais que les informations saisie dans le second userform se
positionne dans le Userform 1.
J'ai commenc=E9 par d=E9clarer une variable pour la r=E9ponse et que ma
variable =E9tait la valeur de la text box, puis ensuite je fais
r=E9apparaitre le userform 1 pour coller ma variable dans une textebox.

Private Sub BtnOK_Click()
Dim RepSTE As String

RepSTE =3D Me.STE.Value
BASE.Select '<=3D 'ou Show, j'ai test=E9 les deux
Me.SOCIETE.Value =3D RepSTE

End Sub

Merci par avance de vos r=E9ponses.
Cordialement.
Alex

4 réponses

Avatar
Corona
Bonsoir Alex,
Si tu veux que TextBox1 de la UserForm AUTSITE hérite de la valeur de
TextBox1 de la UserForm BASE d'où tu pars.
Voici un exemple de code
AUTSITE.TextBox1 = me.TextBox1
ou
AUTSITE.TextBox1 = BASE.TextBox1
et ensuite AUTSITE.Show
Philippe

Alex a écrit :
Bonsoir à tous,

Encore un problème de userform... mais cette fois pas un ! mes deux
userforms. Le second (AUTSITE) alimentant le premier (BASE). Sur le
Premier Userform, une selectcase, si cochée alors le second Userform
apparait avec des textbox à compléter, et un bouton Ok pour valider.
Je voudrais que les informations saisie dans le second userform se
positionne dans le Userform 1.
J'ai commencé par déclarer une variable pour la réponse et que ma
variable était la valeur de la text box, puis ensuite je fais
réapparaitre le userform 1 pour coller ma variable dans une textebox.

Private Sub BtnOK_Click()
Dim RepSTE As String

RepSTE = Me.STE.Value
BASE.Select '<= 'ou Show, j'ai testé les deux
Me.SOCIETE.Value = RepSTE

End Sub

Merci par avance de vos réponses.
Cordialement.
Alex


Avatar
Alex
Bonjour,

Merci Philippe pour ta réponse.
En fait, c'est tout le contraire, je voudrais que ce soit le second
Usurform qui vienne alimenter le premier. En effet, j'ai fait le
second User form pour palier à une adresse manquante dans les menus
déroulants du premier Usuer Form.

Alex
Avatar
Corona
Bonjour Alex,
Et bien tu inverses la commande.
Sans vouloir m'immiscer dans ta façon de programmer, es-tu bien sûr
d'avoir besoin d'une deuxième USERFORM juste pour palier à un objet
manquant dans une USERFORM. Ne serait-il pas plus simple de l'ajouter
sur le premier ?
Sur la façon de gérer des USERFORM, je te conseille vivement d'aller
voir le site d'Eric Renaud qui traite admirablement du sujet
http://ericrenaud.fr/dlg.htm
A une certaine époque cela m'a beaucoup aidé.
Philippe

Alex a écrit :
Bonjour,

Merci Philippe pour ta réponse.
En fait, c'est tout le contraire, je voudrais que ce soit le second
Usurform qui vienne alimenter le premier. En effet, j'ai fait le
second User form pour palier à une adresse manquante dans les menus
déroulants du premier Usuer Form.

Alex


Avatar
Alex
On 17 déc, 11:11, Corona wrote:
Bonjour Alex,
   Et bien tu inverses la commande.
   Sans vouloir m'immiscer dans ta façon de programmer, es-tu bien sûr
d'avoir besoin d'une deuxième USERFORM juste pour palier à un objet
manquant dans une USERFORM. Ne serait-il pas plus simple de l'ajouter
sur le premier ?
   Sur la façon de gérer des USERFORM, je te conseille vivement d 'aller
voir le site d'Eric Renaud qui traite admirablement du sujethttp://ericre naud.fr/dlg.htm
   A une certaine époque cela m'a beaucoup aidé.
Philippe

Alex a écrit :



> Bonjour,

> Merci Philippe pour ta réponse.
> En fait, c'est tout le contraire, je voudrais que ce soit le second
> Usurform qui vienne alimenter le premier. En effet, j'ai fait le
> second User form pour palier à une adresse manquante dans les menus
> déroulants du premier Usuer Form.

> Alex- Masquer le texte des messages précédents -

- Afficher le texte des messages précédents -



Merci Philippe de ton aide. Je suis partie sur une autre idée qui m'a
permis de résoudre mon problème. J'avais bien tenté en effet
d'inverser tes lignes que tu m'avais proposé mais sans succès, sans
doute que je ne les avaient pas positionné au bonne endroit.
Merci aussi pour le lien, je vais regardé cela de plus près.
Cordialement.
Alex