PreviousNext
Help > Programmation avec LAUNCHER Office > Les commandes LNCCMD > Liste des commandes > Commande XLSETLINE
Commande XLSETLINE

Affecte les valeurs à plusieurs cellules sur une même ligne, à partir de la cellule active.

 

Syntaxe

 

CHGVAR

VAR(&CMD) VALUE('XLSETLINE')

CHGVAR

VAR(&PARM1) VALUE('Valeurs')

CHGVAR

VAR(&PARM2) VALUE('Propriétés')

CALL

PGM(LNCCMD) PARM(&HANDLE &CMD &OPT &PARM1 +

&PARM2 &RESULT)

 

Paramètres

 

Paramètres

 

Parm1

Chaîne de caractères contenant les valeurs à affecter aux cellules.

La chaîne de caractères peut contenir le mot symbolique suivant :

%SEP% : Pour passer à la cellule suivante.
Si on était positionné sur la dernière colonne du tableau, on passe au début de la ligne suivante.

 

 

Parm2

Chaîne de caractères pouvant contenir les formats des cellules.

Les formats de chaque cellule sont séparés par le mot %SEP%.

On peut appliquer plusieurs formats sur une cellule. Ils sont alors séparés par un point virgule.

Les formats peuvent être les suivants :

NUMFMT(d [DECPOINT=p] [GRPPOINT=g])

Où :
-d est le nombre de décimales,
-p représente le caractère a utiliser pour le point décimal. (Caractère point par défaut),
-g est le caractère à utiliser pour séparer les groupes de 3 chiffres.

 

PROP fixe la valeur d’une propriété pour le contenu de la cellule correspondante.

Exemple :
PROP(Font.bold)=True; PROP(Font.italic)=True
 

 

 

 

Exemples

 

L’exemple ci-dessous envoie les valeurs pour 4 cellules, et fixe la couleur Bleue à la deuxième cellule, dont la valeur est envoyée en format numérique, avec 2 décimales.

 

 

CHGVAR

VAR(&CMD) VALUE('XLSETLINE')

CHGVAR

VAR(&PARM1) VALUE(&NAME *CAT '%SEP%' *CAT +

&AMOUNT *CAT '%SEP%' *CAT &ADDRESS *CAT '%SEP%'+

*CAT &CITY)

CHGVAR

VAR(&PARM2) VALUE('%SEP%NUMFMT(2);PROP(Font.Color)= +

INT(255) ')

CALL

PGM(LNCCMD) PARM(&HANDLE &CMD &OPT &PARM1 +

&PARM2 &RESULT)

 

 L’exemple ci-dessous créé un nouveau classeur et insert 2 lignes à partir de la cellule B2 :

 

 LNCCMD     CMD(EXCELOPEN) PARM1('visible;new')             

                                                            

 LNCCMD     CMD(XLCELLS) PARM1('Ref="$B$2";select=true')    

                                                            

 LNCCMD     CMD(XLSETLINE) +                                

              PARM1('Aura%SEP%Equipements%SEP%2019') +      

              PARM2('%SEP%PROP(Font.Bold)=true;PROP(Font.+  

              Color)=INT(255)%SEP%PROP(Font.Color)=vbBlue') 

                                                            

 LNCCMD     CMD(XLINSERT) PARM1('After=true') 

             

 LNCCMD     CMD(XLSETLINE) +                                

              PARM1('Power8%SEP%IBM%SEP%2019') +            

              PARM2('%SEP%PROP(Font.Bold)=TRUE;PROP(Font.+  

              Color)=INT(255)%SEP%PROP(Font.Color)=vbBlue') 

 

 

Note

 

Pour utiliser la propriété Font.Color, il faut utiliser les codes couleur Windows.

Soit les constantes:

 

Soit les valeurs:

 

 

PROP(Font.Color)=vbMagenta

PROP(Font.Color)=INT(255) //pour rouge

 

On peut aussi utiliser les valeurs BGR avec la fonction RGB : RGB(blue,green,red). 

 

PROP(Font.Color)=RGB(255,0,0) //bleu

PROP(Font.Color)=RGB(0,255,0) // vert

PROP(Font.Color)=RGB(0,0,255) // rouge

 

Exemple :

 

LNCCMD CMD(XLGOTOCELL) PARM1('$D$5')

 

LNCCMD CMD(XLSETLINE) PARM1('A%SEP%B%SEP%C') +

PARM2('PROP(Font.Color)=RGB(0,255,0);PROP(Font.Bold)=True+

%SEP%PROP(Font.Color)=RGB(255,0,0)%SEP%PROP(Font.Color)=RGB(0,0,255)')                                                               

 

 

image