Affecter macro dans une autre feuille

Bonjour à toutes et à tous,

Mon programme fonctionne sans les worksheet(2) et est le suivant :

Sub BestMonths()
Dim derligne As Long
derligne = Worksheet(2).Range("V65536").End(xlUp).Row
Worksheet(2).Range("W2").Select
Selection.AutoFill Destination:=Worksheet(2).Range("W2:W" & derligne), Type:=xlFillDefault

End Sub

Le programme prend la formule affichée en W2 (feuille résultats) et étend la formule jusqu'à la fin du tableau.

Seulement, j'aimerais que la macro soit lancée depuis un bouton dans la feuille 1 et que les résultats s'affichent dans la feuille qui suit.

Merci d'avance pour votre aide ! :)

Salut à toi !

C'est le problème d'utiliser "Select" qui est sur la feuille active, mais tu peux enlever la sélection pour donner uniquement le range souhaité :

Sub BestMonths()
    Dim derligne As Long
    With Worksheets("résultats")
        derligne = .Range("V65536").End(xlUp).Row
        .Range("W2").AutoFill Destination:=Worksheet(2).Range("W2:W" & derligne), Type:=xlFillDefault
    End With
End Sub

Bon à savoir !!

Cela fonctionne ! Merci beaucoup ! :)