Bonjour,
Je souhaite construire une zone de liste contenant la liste des classeurs Excel ouverts (en mettant en tête de liste le classeur actif, que je souhaite choisir par défaut)
Pour cela, j'utilise le code suivant :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
 
Private Sub UserForm_Initialize()
    ListClasseurs.AddItem (ActiveWorkbook.Name)
    For Each classeur In Workbooks
        If classeur.Name <> ActiveWorkbook.Name And classeur.Name <> "PERSONAL.XLSB" Then
            ListClasseurs.AddItem (classeur.Name)
        End If
    Next classeur
    x = ListClasseurs.ListCount
    x1 = ListClasseurs.List(2)
    nom_classeur = ListClasseurs.Text
    ListClasseurs.Selected(0) = True
End Sub
Or l'avant-dernière instruction
Code : Sélectionner tout - Visualiser dans une fenêtre à part
nom_classeur = ListClasseurs.Text
ne fonctionne pas comme attendu : nom_classeur reste à vide (alors que les 2 lignes précédentes, ajoutées pour contrôle, me donnent bien les résultats corrects) ???
(par ailleurs, la propriété Value - quelle différence avec Text ? - ne fonctionne pas non plus)
Merci pour votre aide !!