Recherche collection pour une boucle For each

jpdur -  
 jpdur -
Bonjour,
je souhaite activer l'un aprés l'autre tous les classeurs ouverts dans Excel
mais je ne connais pas le nom des collections à saisir dans la macro ( en gras)
voici ce que j'avais imaginé

Sub test()
Dim W As Workbooks
For Each W In Windows
W.Activate
MsgBox (W.Name)
Next

End Sub

Merci d'avance
A voir également:

1 réponse

Albert
 
Tu peux essayer ça qui fonctionne:(bien sur tu remplaces la ligne en gras par tes instructions)

For Each Workbook In Workbooks
MsgBox Workbook.FullName
Next
0
jpdur
 
merci de ton aide
0