Nommer une plage de cellule VBA

Bonjour,

J'aimerai un peu d'aide pour nommer une plage de cellule dont j'ai besoin a plusieur reprise et que je ne connai pas la taille

J'explique mon problème :
- Je copie une page web dans le presse-papier et j'aimerai travailler sur cette selection donc voici le morceau de programme que j'ai fait
(page internet : https://worldwide.espacenet.com/publicationDetails/biblio?CC=WO&NR=2008000335&KC=&FT=E&locale=en_EP par exemple)

Sub Essai()

Dim Plage As Range

Sheets.Add.Name = "Modele"
Sheets("Modele").Select

ActiveSheet.Paste

Set Plage = ActiveSheet.UsedRange.Address
'Selection.Name = "Plage"

et la une erreur apparait "erreur 1004"
J'ai besoin de nommer la plage cellule que je vien de coller pour effectuer plusieur opération par la suite du style :

Range("Plage").Find(What:="Inventeur", After:=ActiveCell, LookIn:=xlValues, _
LookAt:=xlWhole, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
MatchCase:=False, SearchFormat:=False).Activate

ActiveCell.Offset(1, 3).Cut (A100)

...

End sub

Merci de votre aide