XL 2016 Plage nommée vba

[bonoboas]

Bonjour à tous,

Je souhaiterais remplacer : [EK8:EW8] et "EK8:EW8" par un range ("selection") de ce code :

With ActiveSheet.UsedRange
    [EK8:EW8].AutoFill Range("EK8:EW" & .Rows(Range("Adherents").Rows.Count).Row + 7), xlFillValues

End With

Merci de votre aide.

Cordialement

Anthony

 

[vgendron]

bonjour
pas sur d'avoir compris, surtout sans fichier et sans savoir ce que tu veux...mais essaie un truc du genre
set NomZone=range("EK8:EW8")
With ActiveSheet.UsedRange
NomZone.AutoFill NomZone & .Rows(Range("Adherents").Rows.Count).Row), xlFillValues
End With

ton code initial fonctionne??????

 

[bonoboas]

En effet il y a une erreur, je viens de corriger

 

[bonoboas]

J'ai compris merci de votre aide