texto vertical en excel

[voldemmor]

Hola amigos os molesto nuevamente. tengo unos informes realizados en excel, lero los titulos de las columnas son un poco grades en comparacion a los datos que contienen que son solo numeros.

podrias ayudarme para ver con que codigo le alineo verticalmente el texto de estas celdas en excel.

para pasar el texto lo hago algo asi:

[

Código Delphi [-]
libro.range['a1:a1'].value := 'promedio';

aclaro que esto puede tener errores ya que no tengo el codigo a mano en este momento.

pero el caso es que funciona y lo que necesito es colocar el texto de la celda verticalmente.

muchas gracias de antemano

[TOPX]

Hola voldemmor,

O sea, con algo así ?

Código Delphi [-]
 ExcelWorksheet1.Cells.Item[i, j].Style.Rotation := -90;

--
"constructive mind, destructive thoughts"

[voldemmor]

Si algo asi.

Muchas gracias y lo probuevo enseguida.

Gracias por su ayuda.

[voldemmor]

Hola amigo.
Hubo un problema con esta linea de codigo.
me da un error:

Metodo "Style" no soportado por la aumatizacion del objeto

No se cual sera el problema.

Con todo estoy usando D6 y en las cabeceras hago referencia a excel 2000

muchas gracias por tu interes y espero me puedas ayudar

[TOPX]

Hola voldemmor,

Entonces me parece que ciertas propiedades cambian para ciertas versiones del wrapper...

En la güeb encontré código así:

Código Delphi [-]
 ExcelWorksheet1.Cells.Item[i, j].Orientation := xlVertical;

Pruébelo, ya que en el momento en mi D7 no tengo instalado los servers de Office. Y espero que éste sí sirva.

--
"constructive mind, destructive thoughts"

[voldemmor]

OK topX yo te aviso y muchas gracias por todo

[voldemmor]

gracias topx esa linea fue la correcta

Código Delphi [-]
ExcelWorksheet1.Cells.Item[i, j].Orientation := 78;

le probe cambiando a valores numericos de grados y funciona a las mil maravillas