Créer une macro en fonction de multiples valeurs

bonjour,
veux-tu apprendre à programmer, ou nous demandes-tu de créer le programme pour toi?

J'ai recemment appris a programmer mais je rencontre des difficultés à faire comprendre a mon programme de trouver le nombre de "Area" et en fonction de ces "Area" créer une page avec seulement ces données.

Le faire une fois est simple mais anticiper le fait que je peux avoir 2 ou 20 Areas differentes est plus complexe pour moi.

Il serait préférabe quelqu'un m'explique en direct comment faire.

Mais si vous ne pouvez pas, je suis a la recherche d'une solution donc je veux bien que vous m'envoyer la solution et je comprendrais par moi-meme comment voous avez résolu mon probleme.

Merci d'avance,

Bonjour tout le monde,

Peut-être comme ceci :

Sub AreasInSheet()
Dim A As Range
    On Error GoTo Fin
    For Each A In ActiveSheet.UsedRange.SpecialCells(xlCellTypeConstants, 2).Areas
        Debug.Print A.Address
    Next
    On Error GoTo 0
    Exit Sub
Fin:
    MsgBox "La méthode SpecialCells renvoie un résultat vide : erreur."
End Sub

Je vais ecrire une partie du programme avec les réponses que j'ai obtenu et je reviendrai sur le forum pour faire le point.

exemple d'une boucle:

dim area as range
set nomarea=[o2]
do while nomarea <>""
    '  faire le travail pour l'area ayant le nom nomarea
    set nomarea=nomarea.offset(1)
loop

Merci beaucoup, mon programme fonction grace à votre aide.

Passez une bonne journée !