Envoie de valeurs d'un classeur vers un autre dans "UserForm"

JDACM

XLDnaute Nouveau
Bonjour le forum
Je voudrais transmettre des valeurs d'un classeur vers un autre par macro.
Ces valeurs doivent être insérées dans une boite "UserForm" du classeur receveur.
Voici ma question :
Comment envoyer une valeur vers une "UserForm" d'un classeur 2 à partir d'une macro de classeur 1?
Ci-joint fichiers 1 et 2.
Merci à tous
Code:
Public Sub Envoyer()
    
    Application.Workbooks("Classeur_2.xls").Activate
    
    Application.Run "Classeur_2.xls!Ouvre_UserForm"
    
    'Comment sélectionner un des items de ComboBox1 ?
    'Comment envoyer une valeur à TextBox1 ?
    
End Sub
Code:
Private Sub UserForm_Initialize()
    ComboBox1.AddItem "Bonjour"
    ComboBox1.AddItem "Bonsoir"
    ComboBox1.AddItem "Au revoir"
    
    ComboBox1.ListIndex = 1

End Sub
 

Pièces jointes

  • Classeur_1.xls
    18.5 KB · Affichages: 59
  • Classeur_2.xls
    26.5 KB · Affichages: 56
  • Classeur_1.xls
    18.5 KB · Affichages: 51
  • Classeur_2.xls
    26.5 KB · Affichages: 53
  • Classeur_1.xls
    18.5 KB · Affichages: 58
  • Classeur_2.xls
    26.5 KB · Affichages: 57

Discussions similaires

Membres actuellement en ligne

Aucun membre en ligne actuellement.

Statistiques des forums

Discussions
314 051
Messages
2 105 057
Membres
109 242
dernier inscrit
zaboul2