boucle tant qu'il y à des feuilles excel

[Niquido]

Bonjour je souhaite répéter ma macro tant qu'il y à des feuille excel comment faire svp, je ne gère pas les boucles

Ma macro ce trouve dans le classeur vierge qui est en copie

je ne peux pas mettre mon classeur de base il est trop gros mais j'ai suffisamment détailler mon code pour savoir ce qu'il fait, enfin il me semble.

Par avance merci pour votre réponse

 

[Dedekind]

Re : boucle tant qu'il y à des feuilles excel

Bonjour,

While ActiveWorkbook.Sheets.Count > 0
'instructions
Wend

Voila ! Bonne journée

 

[Pierrot93]

Re : boucle tant qu'il y à des feuilles excel

Bonjour,

ci-dessous, un exemple de boucle sur toutes les feuilles duclasseur, ce sur la première partie de ton code

Dim ws As Worksheet
For Each ws In Worksheets
    With ws
        .Range("N272:T310").Copy Destination:=.Range("B272")
        .Range("I272:T310").ClearContents
        .Range("G272:H272").AutoFill Destination:=.Range("G272:T272"), Type:=xlFillDefault
    End With
Next ws

bonne journée
@+

 

[Niquido]

Re : boucle tant qu'il y à des feuilles excel

Merci à vous deux