XL 2016 Boucle sur les feuilles sélectionnées

Claudy · 1 Septembre 2018

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 · 1 Septembre 2018

Bonjour,

Teste comme ceci

Code:

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

'Blablabla

Next Ws

job75 · 1 Septembre 2018

Bonjour Claudy, M12,

Claudy à dit:
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 · 1 Septembre 2018

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

XL 2016 Boucle sur les feuilles sélectionnées

Claudy

XLDnaute Accro

M12

XLDnaute Accro

job75

XLDnaute Barbatruc

Claudy

XLDnaute Accro

Discussions similaires