Discussion :

[cottcott]

Bonjour,

Je suis opoose a un petit probleme avec vbscript.

J'ai reussi a creer ma Sheet Excel avec les donnees que je souhaite mais maintenant je souhaiterais grouper les donnees sous un nom.

Par exemple : Les cellules A1 a A3 sous le nom toto, cellule B1B2 et C1C2 sous le nom toto2 etc ...
Sous Excel on peut faire ca avec le menu Insertion -> Nom -> Definir.

Je cherche a faire la meme chose sous vbscript.
Apres quelques recherches internet il semble que cela marche

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
Set objExcel = CreateObject("Excel.Application")
objExcel.Visible = True
Set objWorkbook = objExcel.Workbooks.Add()
Set objWorksheet = objWorkbook.Worksheets(1)
objWorksheet.Activate
objWorksheet.Name = "Ping Output"
 
objWorksheet.Names.Add Name:="toto",RefersToR1C1:="=Ping Output!R1C1:R4C1"

Malheureusement dans mon cas ca ne marche pas.
Qund je lance le script j'ai un Expected Statement au caractere 28 sur cette ligne

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

objWorksheet.Names.Add Name:="toto",RefersToR1C1:="=Ping Output!R1C1:R4C1"

Merci pour votre aide !

[omen999]

bonjour,

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

objWorksheet.Names.Add "toto","=Ping Output!R1C1:R4C1"

ps: l'opérateur d'affectation en vbs est = et pas := comme en delphi

[AlainTech]

Les noms de plages s'appliquent sur le classeur, pas la feuille:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

objWorkbook.Names.Add Name:="toto",RefersToR1C1:="=Ping Output!R1C1:R4C1"

[AlainTech]

ps: l'opérateur d'affectation en vbs est = et pas := comme en delphi

Il s'agit, ici, d'une syntaxe propre à Excel.