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

UserForm & Module

  • Initiateur de la discussion Initiateur de la discussion dashdoush
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

D

dashdoush

Guest
Bonjour Chers Membres,

Donc voila j'ai mon UserfForm qui m'affiche la liste des feuille comme suit :
Code:
Public Sub CommandButton1_Click()
Unload Me
End Sub

Public Sub UserForm_Initialize()
Dim sht As Worksheet
For Each sht In ActiveWorkbook.Worksheets
ComboBox1.AddItem sht.Name
Next sht
End Sub


Public Sub ComboBox1_Change()
Worksheets(ComboBox1.Text).Select
End Sub

Ce que je voudrai c'est que dans mon Module1 j'ai une variable String, à la quelle je veux affecter la valeur séléctionne dans le UserForm .

J'ai essayé ca mais ca marche pas :/


Code:
Option Explicit

Sub test()

Dim feuille As String

' je voudrai affecter la valeur selectionner du userform dans la variable feuille et je sais pas comment faire :/


feuille = UserForm1.Show

MsgBox (feuille)

End Sub

Merci pour vos réponses.
 
Re : UserForm & Module

Re le forum
Re dashdoush

J'étais à côté de la plaque je n'avais pas vu la présence du msgbox dans ta question. "Si" a répondu à ta demande sur l'autre fil de discussion avec un fichier joint !!
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

Réponses
3
Affichages
332
  • Question Question
Microsoft 365 affichage userform
Réponses
4
Affichages
522
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…