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 :
http://v3.espacenet.com/textdoc?DB=EPODOC&IDX=WO2008000335&F=0 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
SEb