Appeler un objet depuis une autre userfom que celle dans laquelle il doit être uRésolu

Question

Bonjour à toutes et à tous,

J'aimerais savoir comment on fait dans VBA-Excel pour dans une Userform 2 "appeler" un objet depuis une userForm1 : 
je m'explique : J'ai une userform1, dans laquelle j'ai des textbox et une combobox, et j'ai écrit dans le code : 

Sheets(ComboBox1.Text).Select
    ligne = ComboBox2.ListIndex + 1
    TextBox1.Value = Range("C" & ligne).Value
    TextBox2.Value = Range("B" & ligne).Value
 nom = ComboBox2.Value
 prenom = TextBox2.Text
 somme = TextBox1.Text

et dans la UserForm2, j'ai besoin des valeus de "nom", "prenom" et  "somme" (pour mettre dans des label), et j'ai essyé d'écrire ça, mais ça marche pas :

Private Sub UserForm_Initialize()
Label1.Caption = UserForm1 & nom
Label2.Caption = UserForm1 & prenom
Label3.Caption = UserForm1 & somme
End Sub

Est-ce que vous pourriez m'indiquer quoi mettre au juste s'il-vous-plaît... Merci beaucoup d'avance... Bonne journée
 
Benito

jrivet · Accepted Answer

Salut,
Déplace la déclaration de tes variables nom prenom et somme  et mets les comme public dans un Module ou place les comme public dans ton UserForm 

Public Nom As String
Public Prenom As String
Public Somme As String , ----
[code.aspx?ID=41455 By Renfield]

@+: Ju£i?n
Pensez: Réponse acceptée

jmfmarques · Answer

Bonjour,

soit :
Private Sub UserForm_Initialize()
  Label1.Caption = UserForm1. ComboBox2.Value
  Label2.Caption = UserForm1 .TextBox2.Text
  Label3.Caption = UserForm1. TextBox1.Text
End Sub

soit tu déclares publiques dans un module les variables nom, prenom et somme et

Private Sub UserForm_Initialize()
  Label1.Caption = nom
  Label2.Caption = prenom
  Label3.Caption =  somme
End Sub

Appeler un objet depuis une autre userfom que celle dans laquelle il doit être u

2 réponses

Votre réponse

Discussions similaires