vba erreur dans selection plage

[setsix]

Bonjour

Je cherche à transposer la ligne suivante pour remplacer la plage A2:A40 mais je n'arrive pas à savoir ce qui déconne dans ma ligne:

si je fais Sheets("feuill1").Range("A2:A40").Name = "critere" çà marche

mais si je fais Sheets("feuill1").Range(Range("A2"),Range("A65000").End(xlUp)).Name = "critere"
çà marche pas


Merci d'avance,

 

[tototiti2008]

Re : vba erreur dans selection plage

Bonjour setsix,

peut-être comme ça ?

With Sheets("feuil1")
    .Range(.Range("A2"), .Range("A65000").End(xlUp)).Name = "critere"
End With

 

[setsix]

Re : vba erreur dans selection plage

Bonjour setsix,

peut-être comme ça ?

With Sheets("feuil1")
    .Range(.Range("A2"), .Range("A65000").End(xlUp)).Name = "critere"
End With

Tout simplement

Merci Tototiti