Macro pour fusionner liste_mois année

Bonjour à tous,

j'ai petit souci avec mon code vba. j'ai une année qui se trouve en cellule "A1" et la liste des mois qui se trouve dans un autre onglet.

J'aimerais compléter à chaque fois la liste des mois que je récupère dans l'autre onglet avec l'année saisie en "A1".

Ma macro me prends toujours le dernier mois de la liste c'est à dire à chaque fois elle m'affiche par exemple décembre - 2016.

Sub Test_date()
    Dim x, y As Integer
    For x = 7 To 18
        For y = 2 To 13
        Cells(x, 2) = Feuil4.Cells(y, 1).Value & "-" & Cells(1, 1).Value
        Next y
    Next x
End Sub

Merci d'avance.

Bonjour,

Sub Test_date()
    Dim x As Integer
    For x = 0 To 11
        Cells(x + 7, 2) = Feuil4.Cells(x + 2, 1).Value & "-" & Cells(1, 1).Value
    Next x
End Sub

[NB- le type doit être indiqué pour chacune des variables séparées par des virgules, celles où tu ne l'indiques pas sont de type Variant.]

Cordialement.

Bonjour,

merci pour votre rapidité. ça marche bien.