Copier la première feuille commençant par "A_"

Bonjour,

Je sais comment copier en indexant la feuille, comment créer la feuille après ou avant un onglet mais je ne sais pas comment copier la première feuille (et seulement la première feuille) commençant par "A_".

Je m'explique, j'ai par exemple quatre onglet "France", "Belgique", "A_Alsace", "A_Paris".

Je souhaiterais qu'il puisse copier seulement "A_Alsace" ou bien seulement "A_Paris" seulement l'un des deux, le premier qu'il trouve. Bien sûr les onglets peuvent être à n'importe quel position.

Merci de votre aide,

Filou93

Bonjour,

un essai macro :

Sub CopieFeuilleA()
Dim Nb As Integer, i As Integer
Nb = Worksheets.Count
For i = 1 To Nb
    If Worksheets(i).Name Like "A_*" Then
        Worksheets(i).Copy After:=Sheets(Nb)
        Exit For
    End If
Next
End Sub

A+

Bonjour,

Merci AlgoPlus, je l'ai adapté à mon code, ça marche nickel.

Je te souhaite une bonne journée,

Filou93