Logo GNT
Actualités Tests & Guides Bons Plans
Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11
Entraide Applications Microsoft Office Excel Nommer la zone en cours

Nommer la zone en cours

4 réponses
Avatar
DéGé
ex: FeuilleListes.Range("A1").CurrentRegion
Comment affecter un nom par programmation à ctte zone ?
DéGé
Signaler un problème avec ce contenu

4 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
garnote
Salut DéGé,

Tu pourrais essayer ceci :
(un exemple)
Sub Nommer()
Set plage = Worksheets("Feuil1").Range("A1").CurrentRegion
ActiveWorkbook.Names.Add Name:="ici", RefersToR1C1:=plage
End Sub

Serge

"DéGé" a écrit dans le message de news:
c258vf$2ur$
ex: FeuilleListes.Range("A1").CurrentRegion
Comment affecter un nom par programmation à ctte zone ?
DéGé




Avatar
DéGé
Merci beaucoup !

"garnote" a écrit dans le message de
news:qNp1c.101885$
Salut DéGé,

Tu pourrais essayer ceci :
(un exemple)
Sub Nommer()
Set plage = Worksheets("Feuil1").Range("A1").CurrentRegion
ActiveWorkbook.Names.Add Name:="ici", RefersToR1C1:=plage
End Sub

Serge

"DéGé" a écrit dans le message de news:
c258vf$2ur$
ex: FeuilleListes.Range("A1").CurrentRegion
Comment affecter un nom par programmation à ctte zone ?
DéGé








Avatar
garnote
RefersToR1C1:=plage
peut être remplacé par
RefersTo:=plage

Serge

"DéGé" a écrit dans le message de news:
c259qe$2jp$
Merci beaucoup !

"garnote" a écrit dans le message de
news:qNp1c.101885$
Salut DéGé,

Tu pourrais essayer ceci :
(un exemple)
Sub Nommer()
Set plage = Worksheets("Feuil1").Range("A1").CurrentRegion
ActiveWorkbook.Names.Add Name:="ici", RefersToR1C1:=plage
End Sub

Serge

"DéGé" a écrit dans le message de news:
c258vf$2ur$
ex: FeuilleListes.Range("A1").CurrentRegion
Comment affecter un nom par programmation à ctte zone ?
DéGé












Avatar
michdenis
Bonsoir,

As-tu essayé ceci :

Worksheets("Feuil1").Range("A1").CurrentRegion.Name = "Plage"


Salutations!



"garnote" a écrit dans le message de news:khq1c.101907$
RefersToR1C1:=plage
peut être remplacé par
RefersTo:=plage

Serge

"DéGé" a écrit dans le message de news:
c259qe$2jp$
Merci beaucoup !

"garnote" a écrit dans le message de
news:qNp1c.101885$
Salut DéGé,

Tu pourrais essayer ceci :
(un exemple)
Sub Nommer()
Set plage = Worksheets("Feuil1").Range("A1").CurrentRegion
ActiveWorkbook.Names.Add Name:="ici", RefersToR1C1:=plage
End Sub

Serge

"DéGé" a écrit dans le message de news:
c258vf$2ur$
ex: FeuilleListes.Range("A1").CurrentRegion
Comment affecter un nom par programmation à ctte zone ?
DéGé