Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

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

Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…