Discussion :

[remi82]

Bonjour,

J'ai une table contenant des données extraites de ma base SQL.
J'ai ensuite fait par programmation, une sortie vers excel. Je n'utilise pas tableversexcel car je dois utiliser un fichier type avec un logo, etc...

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
 
mafeuille est un xlsDocument
mafeuille = xlsOuvre(nomfichier)
 
        tantque pas h.endors
        mafeuille[numlign,"B"] = variable1
	mafeuille[numlign,"C"] = variable2
	mafeuille[numlign,"D"] = variable3
	mafeuille[numlign,"E"] = variable4
 
        .....
        hlitsuivant
 
FIN
 
xlsSauve(mafeuille) //On sauvegarde le document.

J'essai par contre de modifier la police et la taille ; mais sans succès.

Avec policecréé, iParamètreXLS....iCréePolice(1, 8, iNormal, "Arial") mais je n'y arrive pas.
Merci d'avance pour votre aide.

[Nicolas_Jeanneau]

Bonjour,

essayes avec iArial plutôt !

bon courage,

Nicolas

[Ry_Yo]

Bonjour,

je viens de faire le test (WD19 56s) avec iPoliceCrée(), cela fonctionne parfaitement.

Il faudrait donc que vous nous montriez votre code "non-fonctionnel" car dans le code que vous avez mis, je ne vois aucun appel aux changement de police.

Cdlt

[remi82]

Bonjour,

Justement, je ne sais pas quoi mettre comme code.
J'ai essayé plusieurs code, sans résultat.

Encore merci

[Ry_Yo]

Vu que vous ne voulez pas me montrer le code NON-fonctionnel, je vous invite à regarder l'aide :

http://doc.pcsoft.fr/fr-FR/?2510095&name=Police

[remi82]

Bonsoir,

J'avais déjà regardé, mais sans succès.
Je verrai demain et reviendrai vers vous.

En tout cas, encore merci pour votre aide.

[remi82]

Bonjour,

J'ai donc repris l'aide de windev via "policecrée"

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
numlign est un entier = 23 //On indique à partir de quelle ligne nous allons écrire les données. 
 
 
TANTQUE PAS H.EnDehors
 
	MaPolice est une Police
	MaPolice = PoliceCrée("Arial", 12, iGras)
	mafeuille[numlign]..Police = MaPolice
 
 
	mafeuille[numlign,"A"] = var1
	mafeuille[numlign,"B"] = var2
	mafeuille[numlign,"C"] = var3
	mafeuille[numlign,"D"] = var4
 
 
	HLitSuivant(Asrecep)
	numlign++
 
FIN

Windev me dit "opérateur '..' interdit.
Encore merci

[Ry_Yo]

Enfin du code !

Donc à la lecture de votre code, l'erreur se trouve au niveau des déclarations.

Quel est le type de déclaration de la variable mafeuille ?

Je suppose qu'il est de type xlsDocument ?

Si oui alors l'erreur est "normal" un type xlsDocument ne possède pas cette propriété :
http://doc.pcsoft.fr/fr-FR/?10000174..._type_variable

Il faut faire le traitement à la cellule, et là vous verrez que la propriété Police existe :
http://doc.pcsoft.fr/fr-FR/?10000174..._type_variable

[remi82]

Ry_Yo,

Oui, j'utilise bien xlsdocument.

Je dois vraiment être stupide, mais je ne trouve rien dans la doc.
Que ce soit dans les livres fourni avec la licence, ou via internet.

J'ai donc essayé avec xlscellule, mais sans résultat. Enfin, je ne sais pas l'utiliser.
J'ai ajouté le code ci-dessous :

Code :

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

1
2
3
	macellule est une xlsCellule
	macellule..Police..Nom = "Arial"
	macellule..Police..Taille = 8

Mais comment faire le lien avec mon document "mafeuille" ?

Merci d'avance.

[Ry_Yo]

Alors dans l'ordre :
- crée un xlsDocument
- crée un xlsCellule
- affecté une cellule du xlsDocument dans le xlsCellule

Cela donnera quelquechose de ce genre :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
mafeuille est un xlsDocument
maCellule est un xlsCellule
maPolice est une Police 

// Imaginons que je veuille modifier la cellule A1
maCellule = mafeuille[1,1]

//Je peux modifer la police maintenant à partir de maCellule
maPolice = PoliceCrée("Arial", 15, iGras)

maCellule..Police = maPolice 

// On mémorise l'info dans le document
mafeuille[1,1] = maCellule 

// On sauvegarde le xls, et cela devrait être OK

Donc, on voit bien que le traitement doit se faire à la cellule, et pas à la ligne ou colonne... Hélas il faudra donc faire un parcours supplémentaire si on doit mettre en forme tout une ligne ou tout une colonne.

[EriCstoFF]

De mon côté j'en avais eu besoin, voici un bout de code qui devrait t'aider.

Code :

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

1
2
3
PoliceTypeBloc est une Police = PoliceCrée("Arial",11,iSouligné+iGras,Noir)
mafeuille[1,"A"]..Police = PoliceTypeBloc // A préciser pour chaque case...
mafeuille[1,"A"] = "Prélèvements automatiques avec TVA à 20%"

En fait il faut préciser la police pour chaque case.

Amicalement,

Eric.

[remi82]

Re,

Ils n'ont pas fait simple cette fois ci.
En tout cas, merci beaucoup pour ton aide. Je m'en vais appliquer ça.

Encore merci

[remi82]

Bonjour EriCstoFF,

J'ai essayé avec votre méthode. Et ça fonctionne parfaitement et je trouve, plus simplement.
Merci à tous pour votre aide.