Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   Colocar bordes en celdas de excel desde delphi (https://www.clubdelphi.com/foros/showthread.php?t=27398)

MAngelito 18-11-2005 23:32:33

Colocar bordes en celdas de excel desde delphi
 
Hola a todos :p

Necesito que alguien me ayude a colocarle bordes a las celdas de excel desde Delphi, pero no quiero colocar todos los bordes a cada celda como lo haria con la siguiente instruccion appXls.range['A1:M11'].border.linestyle:=xlcontinuous;

Lo que necesito es colocar en algunas celdas sólo el borde derecho, enotras sólo
el borde izquierdo, etc... Ya que estoy enviando registros de una Base de datos y por cada grupo de datos correspondientes a una persona los necesito encerrar en un cuadro(bordes), pero en algunos casos necesito colocar el borde derecho de las celdas con doble linea y los demas bordes con linea sencilla, cosa que creo que no permite el metodo borderarround(tipoLinea,Grosor,IndiceColor,Color).

Lo que necesito es manejar los bordes independientemente. Estoy usando Delphi 7.0 y manipulo excel mediante una variable ole:

Código Delphi [-]
var
appXlsOleVariant
begin
appXls:=CreateOleObject('Excel.Application.10');
appXls.workBooks.open('c:\ReportedeInasistencias EPO100.xls');
ws:=appxls.activesheet;
appXls.visible:=true;
end;

Tambien tengo problemas al guardar ya que estoy llamando a el archivo 'c:\ReportedeInasistencias EPO100.xls' y lo quiero guardar automaticamente con otro nombre 'c:\ReportedeInasistenciasNoviembre EPO100.xls', para no modificar el primero, sin que el usuario final tenga que darle el nuevo nombre.

Si necesitan mas codigo lo puedo publicar, con la finalidad de que puedan entender mi duda.

Espero que me puedan ayudar, por favor o enviarme alguna sugerencia.

Saludos!!

ContraVeneno 01-06-2006 20:14:42

Respondo esto por si alguien se vuelve a topar con la misma duda:

Código Delphi [-]
appXls.range['A1:M11'].Borders[xlTop].weight := xlMedium;

XlTop, xlBottom, xlLeft, xlRigth

Alejandro73 11-12-2007 17:08:04

Xlmedium
 
hola

Me gustaria saber como,puedo dejar la linea de menor grosor

saludos

Alejandro
Valparaiso - CHILE

ContraVeneno 11-12-2007 20:31:53

Código Delphi [-]
appXls.range['A1:M11'].Borders[xlTop].weight := -4138;

varía el número, o cualquiera de estas opciones: xlThick, xlMedium, xlThin

Alejandro73 11-12-2007 21:48:24

Bordes de Celdas
 
Gracias

La que me acomada es xlThin; que deja la linea del borde delgada

si me permites solicitar algo mas

me gustaria que la hoja se desplace hacia abajo a medida que se van llenando las Celdas

y te Reitero mis agradecimientos

Alejandro
Valparaiso - CHILE


La franja horaria es GMT +2. Ahora son las 16:32:56.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi