OVH Cloud OVH Cloud

nommer cellules avec vb6

2 réponses
Avatar
Jacques M.
bonjour le groupe,

Je cherche à donner un nom à une cellule Excel.
Avec vba, je trouve cette commande :
ActiveWorkbook.Names.Add Name:="MAG0267", RefersToR1C1:="=USINAGE!R20C6"
Dès que je la mets dans mon code, tout ce passe correctement, sauf que la
cellule n'est pas nommée ! Je vais voir dans dans les noms de cellules : rien
(à coter du champ des formules). Mais dans <Insertion><Nom>, je retrouve bien
mes références. En y regardant de plus près, les autres cellules référencées
du template Excel ont une autre structure, du genre : "=USINAGE!$A:$1"
Et cette structure n'est pas compatible avec la commande
ActiveWorkbook.Names.Add Name

Que faire ? Merci de votre aide.

Jacques

2 réponses

Avatar
jps
bonjour jacques
peut-être qu'ainsi, ça ira mieux

ActiveWorkbook.Names.Add Name:="MAG0267",
RefersToR1C1:=Sheets("usinage").Range("C20")

HTH
jps

"Jacques M." a écrit dans le message de
news:
bonjour le groupe,

Je cherche à donner un nom à une cellule Excel.
Avec vba, je trouve cette commande :
ActiveWorkbook.Names.Add Name:="MAG0267", RefersToR1C1:="=USINAGE!R20C6"
Dès que je la mets dans mon code, tout ce passe correctement, sauf que la
cellule n'est pas nommée ! Je vais voir dans dans les noms de cellules :
rien
(à coter du champ des formules). Mais dans <Insertion><Nom>, je retrouve
bien
mes références. En y regardant de plus près, les autres cellules
référencées
du template Excel ont une autre structure, du genre : "=USINAGE!$A:$1"
Et cette structure n'est pas compatible avec la commande
ActiveWorkbook.Names.Add Name

Que faire ? Merci de votre aide.

Jacques



Avatar
Jacques M.
merci de ta réponse. Je l'applique tout de suite.

Jacques


bonjour jacques
peut-être qu'ainsi, ça ira mieux

ActiveWorkbook.Names.Add Name:="MAG0267",
RefersToR1C1:=Sheets("usinage").Range("C20")

HTH
jps

"Jacques M." a écrit dans le message de
news:
bonjour le groupe,

Je cherche à donner un nom à une cellule Excel.
Avec vba, je trouve cette commande :
ActiveWorkbook.Names.Add Name:="MAG0267", RefersToR1C1:="=USINAGE!R20C6"
Dès que je la mets dans mon code, tout ce passe correctement, sauf que la
cellule n'est pas nommée ! Je vais voir dans dans les noms de cellules :
rien
(à coter du champ des formules). Mais dans <Insertion><Nom>, je retrouve
bien
mes références. En y regardant de plus près, les autres cellules
référencées
du template Excel ont une autre structure, du genre : "=USINAGE!$A:$1"
Et cette structure n'est pas compatible avec la commande
ActiveWorkbook.Names.Add Name

Que faire ? Merci de votre aide.

Jacques