éxécuter un module sur plusieur feuill
noobduvb
-
zavenger Messages postés 817 Statut Membre -
zavenger Messages postés 817 Statut Membre -
Bonjour everybodyyy,
voilà j'ai un petit module fait un traitement sur la feuil1 de mon classeur je voudrais ensuite qui le fasse sur les autre feuilles ( 1 ,2, 3 ... 10).
parcontre j'ai en premiere feuille appellé "Menu" les boutons ou le lance mes macros
donc je voudrais que mes macros tournent sur toutes les feuilles sauf sur ma feuille menu
donc j"avais l'idée de partir avec un truc dans le genre
si quelqu'un peu méguillet xD merci d'avance
voilà j'ai un petit module fait un traitement sur la feuil1 de mon classeur je voudrais ensuite qui le fasse sur les autre feuilles ( 1 ,2, 3 ... 10).
parcontre j'ai en premiere feuille appellé "Menu" les boutons ou le lance mes macros
donc je voudrais que mes macros tournent sur toutes les feuilles sauf sur ma feuille menu
donc j"avais l'idée de partir avec un truc dans le genre
Sub Boucle_Sheet()
Dim xlsSheet As Excel.Worksheet 'Variable objet "feuille"
'Boucle sur toutes les feuilles du classeur actif:
For Each xlsSheet In Worksheets
'montraitement
Next
si quelqu'un peu méguillet xD merci d'avance
3 réponses
-
Bonjour
C'est un bon debut
il suffit juste de rajouter dans ta boucle for
If xlsSheet.Name <> "Menu" then
end if -
ok ! jvé essayer je vous redit ca!
petite question dans le même style
simon programme venais à étre modifié
imaginons que je veus faire mon traitement de la feuil4 à 20
je peus faire un
for xlssheet = 4 to 20 ?
un truc dans le genre xD -
tu recupere l'index du feuille par la propriete Index (ex: Activesheet.Index)
et tu peux acceder à une feuille particuliere via sheet(1) ou sheet("Menu")
donc pour faire une boucle
for Ii 4 to 20
...
sheet(Ii).select
...
Next
