PDA

Ver la Versión Completa : texto vertical en excel


voldemmor
18-07-2008, 17:38:52
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:

[
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
18-07-2008, 20:49:31
Hola voldemmor,

O sea, con algo así ?


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


--
"constructive mind, destructive thoughts"

voldemmor
19-07-2008, 15:39:21
Si algo asi.

Muchas gracias y lo probuevo enseguida.

Gracias por su ayuda.

voldemmor
23-07-2008, 15:27:50
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
23-07-2008, 15:54:54
Hola voldemmor,

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

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

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
24-07-2008, 02:53:51
OK topX yo te aviso y muchas gracias por todo

voldemmor
30-07-2008, 01:43:48
gracias topx esa linea fue la correcta
ExcelWorksheet1.Cells.Item[i, j].Orientation := 78;
le probe cambiando a valores numericos de grados y funciona a las mil maravillas