XL 2016 Boucle sur les feuilles sélectionnées

[Claudy]

Bonjour à tous,
un classeur , pour chaque mois une feuille.
Je voudrais lancer une macro pour chaque feuille sélectionnée avec ceci:

For Each Ws In ActiveWindow.SelectedSheets

'bla bla...

Next Ws

La procédure se lance et boucle uniquement avec la première feuille sélectionnée.
pluto^t que de passer à la feuille suivante....

Un petit conseil ?
Merci d'avance,
Claudy

 

[M12]

Bonjour,

Teste comme ceci

Set maSelection = ActiveWindow.SelectedSheets '
For Each Ws In maSelection

'Blablabla

Next Ws

 

[job75]

Bonjour Claudy, M12,

La procédure se lance et boucle uniquement avec la première feuille sélectionnée.
pluto^t que de passer à la feuille suivante....

Chez moi toutes les feuilles sélectionnées sont traitées avec le code du post #1...

A+

 

[Claudy]

Re bonjour,
Merci à vous deux...
J'ai réussi en plaçant un Ws.select:

Set maSelection = ActiveWindow.SelectedSheets '
For Each Ws In maSelection
Ws.Select
'Blablabla

Next Ws

et comme ça , ça roule.
Bon week end,
Claudy