PC SOFT

FOROS PROFESIONALES
WINDEVWEBDEV y WINDEV Mobile

Inicio → WINDEV 2024 → Format texte d'une cellule Excel
Format texte d'une cellule Excel
Iniciado por Anne, 22,jul. 2004 17:18 - 8 respuestas
Publicado el 22,julio 2004 - 17:18
Bonjour,

Dans un projet, j'arrive à créer une feuille excel, à changer la police,
la couleur, ... d'un texte d'une cellule:
MaFeuilleXLS>>Range("A2")>>Font>>Bold=True
MaFeuilleXLS>>Range("A2")>>Font>>Italic=True
MaFeuilleXLS>>Range("A2")>>Font>>Color=RGB(255, 0, 0)
MaFeuilleXLS>>Range("A2")>>Font>>Size
MaFeuilleXLS>>Range("A2")>>Font>>Name="Comic Sans MS"

mais je n'arrive pas à centrer le texte dans la cellule.
Avez vous une idée?
Merci
Anne
Publicado el 22,julio 2004 - 17:30
j'ai oublié qq chose:
je n'arrive pas non plus à changer les marges de la feuille

"Anne" <atcamus@mordacq.com> wrote:


Bonjour,

Dans un projet, j'arrive à créer une feuille excel, à changer la police,
la couleur, ... d'un texte d'une cellule:
MaFeuilleXLS>>Range("A2")>>Font>>Bold=True
MaFeuilleXLS>>Range("A2")>>Font>>Italic=True
MaFeuilleXLS>>Range("A2")>>Font>>Color=RGB(255, 0, 0)
MaFeuilleXLS>>Range("A2")>>Font>>Size
MaFeuilleXLS>>Range("A2")>>Font>>Name="Comic Sans MS"

mais je n'arrive pas à centrer le texte dans la cellule.
Avez vous une idée?
Merci
Anne
Publicado el 22,julio 2004 - 17:35
"Anne" <atcamus@mordacq.com> wrote:


Bonjour,

Dans un projet, j'arrive à créer une feuille excel, à changer la police,
la couleur, ... d'un texte d'une cellule:
MaFeuilleXLS>>Range("A2")>>Font>>Bold=True
MaFeuilleXLS>>Range("A2")>>Font>>Italic=True
MaFeuilleXLS>>Range("A2")>>Font>>Color=RGB(255, 0, 0)
MaFeuilleXLS>>Range("A2")>>Font>>Size
MaFeuilleXLS>>Range("A2")>>Font>>Name="Comic Sans MS"

mais je n'arrive pas à centrer le texte dans la cellule.
Avez vous une idée?
Merci
Anne


C'est juste une idée, je ne sais pas si cela marchera mais as-tu essayé :
MaFeuilleXLS>>Range("A2")>>Font>>Align=Center ???
Publicado el 22,julio 2004 - 18:03
Non, ça ne marche pas: "Align n'est pas reconnu"

"Gilles GABET" <gilles.gabet@neuf.fr> wrote:


"Anne" <atcamus@mordacq.com> wrote:


Bonjour,

Dans un projet, j'arrive à créer une feuille excel, à changer la police,
la couleur, ... d'un texte d'une cellule:
MaFeuilleXLS>>Range("A2")>>Font>>Bold=True
MaFeuilleXLS>>Range("A2")>>Font>>Italic=True
MaFeuilleXLS>>Range("A2")>>Font>>Color=RGB(255, 0, 0)
MaFeuilleXLS>>Range("A2")>>Font>>Size
MaFeuilleXLS>>Range("A2")>>Font>>Name="Comic Sans MS"

mais je n'arrive pas à centrer le texte dans la cellule.
Avez vous une idée?
Merci
Anne


C'est juste une idée, je ne sais pas si cela marchera mais as-tu essayé

:
MaFeuilleXLS>>Range("A2")>>Font>>Align=Center ???
Publicado el 22,julio 2004 - 18:37
Cela devrait fonctionner je pense:

MaFeuilleXLS>>Range("A2")>>HorizontalAlignment = xlCenter

"Anne" <atcamus@mordacq.com> wrote:


Bonjour,

Dans un projet, j'arrive à créer une feuille excel, à changer la police,
la couleur, ... d'un texte d'une cellule:
MaFeuilleXLS>>Range("A2")>>Font>>Bold=True
MaFeuilleXLS>>Range("A2")>>Font>>Italic=True
MaFeuilleXLS>>Range("A2")>>Font>>Color=RGB(255, 0, 0)
MaFeuilleXLS>>Range("A2")>>Font>>Size
MaFeuilleXLS>>Range("A2")>>Font>>Name="Comic Sans MS"

mais je n'arrive pas à centrer le texte dans la cellule.
Avez vous une idée?
Merci
Anne
Publicado el 22,julio 2004 - 19:01
j'ai essayé avec xlCenter entre " car sinon erreur de compilation, mais ça
ne fonctionne pas non plus: erreur =>
"Vous accédez au membre Automation HorizontalAlignment.
Erreur 800A03EC : Impossible de définir la propriété HorizontalAlignment
de la classe Range.
Erreur 80020005, Type incorrect pour le paramètre 1
...."

"Aurélien Machabert" <43@gauthiersa.fr> wrote:


Cela devrait fonctionner je pense:

MaFeuilleXLS>>Range("A2")>>HorizontalAlignment = xlCenter

"Anne" <atcamus@mordacq.com> wrote:


Bonjour,

Dans un projet, j'arrive à créer une feuille excel, à changer la police,
la couleur, ... d'un texte d'une cellule:
MaFeuilleXLS>>Range("A2")>>Font>>Bold=True
MaFeuilleXLS>>Range("A2")>>Font>>Italic=True
MaFeuilleXLS>>Range("A2")>>Font>>Color=RGB(255, 0, 0)
MaFeuilleXLS>>Range("A2")>>Font>>Size
MaFeuilleXLS>>Range("A2")>>Font>>Name="Comic Sans MS"

mais je n'arrive pas à centrer le texte dans la cellule.
Avez vous une idée?
Merci
Anne

Publicado el 23,julio 2004 - 12:29
Je ne vois pas trop alors malheureusement !!!!


"Anne" <atcamus@mordacq.com> wrote:


j'ai essayé avec xlCenter entre " car sinon erreur de compilation, mais

ça
ne fonctionne pas non plus: erreur =>
"Vous accédez au membre Automation HorizontalAlignment.
Erreur 800A03EC : Impossible de définir la propriété HorizontalAlignment
de la classe Range.
Erreur 80020005, Type incorrect pour le paramètre 1
..."

"Aurélien Machabert" <43@gauthiersa.fr> wrote:


Cela devrait fonctionner je pense:

MaFeuilleXLS>>Range("A2")>>HorizontalAlignment = xlCenter

"Anne" <atcamus@mordacq.com> wrote:


Bonjour,

Dans un projet, j'arrive à créer une feuille excel, à changer la police,
la couleur, ... d'un texte d'une cellule:
MaFeuilleXLS>>Range("A2")>>Font>>Bold=True
MaFeuilleXLS>>Range("A2")>>Font>>Italic=True
MaFeuilleXLS>>Range("A2")>>Font>>Color=RGB(255, 0, 0)
MaFeuilleXLS>>Range("A2")>>Font>>Size
MaFeuilleXLS>>Range("A2")>>Font>>Name="Comic Sans MS"

mais je n'arrive pas à centrer le texte dans la cellule.
Avez vous une idée?
Merci
Anne


Publicado el 23,julio 2004 - 14:01
ça y est, j'ai enfin trouvé!!
pour changer les marges d'une feuille excel:
MaFeuilleXLS>>Sheets("Feuil1")>>PageSetup>>LeftMargin = 0.5

et pour centrer un texte d'une cellule:
MaFeuilleXLS>>Range("A6")>>HorizontalAlignment =-4108

"Aurélien MACHABERT" <43@gauthiersa.fr> wrote:


Je ne vois pas trop alors malheureusement !!!!


"Anne" <atcamus@mordacq.com> wrote:


j'ai essayé avec xlCenter entre " car sinon erreur de compilation, mais
ça

ne fonctionne pas non plus: erreur =>
"Vous accédez au membre Automation HorizontalAlignment.
Erreur 800A03EC : Impossible de définir la propriété HorizontalAlignment
de la classe Range.
Erreur 80020005, Type incorrect pour le paramètre 1
..."

"Aurélien Machabert" <43@gauthiersa.fr> wrote:


Cela devrait fonctionner je pense:

MaFeuilleXLS>>Range("A2")>>HorizontalAlignment = xlCenter

"Anne" <atcamus@mordacq.com> wrote:


Bonjour,

Dans un projet, j'arrive à créer une feuille excel, à changer la police,
la couleur, ... d'un texte d'une cellule:
MaFeuilleXLS>>Range("A2")>>Font>>Bold=True
MaFeuilleXLS>>Range("A2")>>Font>>Italic=True
MaFeuilleXLS>>Range("A2")>>Font>>Color=RGB(255, 0, 0)
MaFeuilleXLS>>Range("A2")>>Font>>Size
MaFeuilleXLS>>Range("A2")>>Font>>Name="Comic Sans MS"

mais je n'arrive pas à centrer le texte dans la cellule.
Avez vous une idée?
Merci
Anne



Publicado el 24,julio 2004 - 03:25
"Anne" <atcamus@mordacq.com> wrote:


j'ai essayé avec xlCenter entre " car sinon erreur de compilation, mais

ça
ne fonctionne pas non plus: erreur =>
"Vous accédez au membre Automation HorizontalAlignment.
Erreur 800A03EC : Impossible de définir la propriété HorizontalAlignment
de la classe Range.
Erreur 80020005, Type incorrect pour le paramètre 1
..."


MaFeuilleXLS>>Range("A2")>>HorizontalAlignment = xlCenter
Si tu envoies ça, c'est clair qu'il y a plantage.
Il faut envoyer la constante (valeur numérique)
Donc :
MaFeuilleXLS>>Range("A2")>>HorizontalAlignment = -4108 (Attention c'est :
moins 4108)

Tu peux trouver les valeurs des constantes dans l'explorateur d'objet sous
l'éditeur VB de Excel :
Menu outil > Macros > VB Editor
Dans la fenêtre recherche le bouton "Explorateur d'objet" pour ouvrir cet
explorateur, ensuite recherche xlCenter (bouton jumelle), et tu trouveras
la constante en bas de l'écran. Moi, je fonctionne comme ça, et j'ai toujours
réussi.
En effet, si tu te bases sur les macros pour trouver la syntaxe, tu vois
xlCenter, mais depuis ton application
tu dois envoyer la constante équivalente.

Aplus