Bonjour,
je comprend pas, j'ai refait un copier/coller du code ci-dessus dans un nouveau USF (dans un nouveau classeur) et ca marche sans probleme...
quant au code retour juste ci-dessus, il n'est pas correct
If Workbooks(t).Name <> Sel1 Then ListBox3.AddItem Workbooks(t).Name
est beaucoup mieux.
Cette ligne permet de mettre dans la listbox3, la liste des classeur ouvert sauf celui selectionne en textbox1 (stocke dans la variable sel1)
Je rappelle que tu dois creer un USF avec 3 textbox
-textbox1 : liste des classeurs ouverts
-textbox2 : liste des feuilles du classeur selectionne en textbox1
-textbox3 : liste des classeurs ouverts sauf celui selectionne en textbox1
-commadbutton1 : lancer le copier/coller
creer cet USF puis une macro qui ouvre cet USF et pour moi ca marche...
si ca marche toujours pas et que tu veux une explication detaillee du code, fais signe...
A++, Sylsyl.