Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Servers (https://www.clubdelphi.com/foros/forumdisplay.php?f=9)
-   -   Color de fondo en celdas de Excel (https://www.clubdelphi.com/foros/showthread.php?t=400)

acalderonr 14-05-2003 00:58:17

Color de fondo en celdas de Excel
 
Hola, tengo una aplicación que exporta información a Excel sin ningún problema, pero no he logrado darle color al fondo de las celdas según un rango, es decir, este es parte del código que uso:

ExcelWorkSheet1.Range['B3','B5'].Font.Bold:=true;
ExcelWorkSheet1.Range['B3','B5'].Font.Name := 'Arial';
ExcelWorkSheet1.Range['B3','B5'].Font.Size := 8;
ExcelWorkSheet1.Cells.Item[3,2].Value := 'este donante cambió de efectivo a tarjeta';

por ejemplo, pero alguien de ustedes sabrá como puedo darle color al fondo de la celda mediante un rato?

Gracias y saludos

Ruben_Cu 15-05-2003 06:23:26

Hola acalderonr, si quieres darle color interior a una celda o rango de ellas prueba usar el código siguiente;

Código:

ExcelWorkSheet1.Range['B3','B5'].Font.Bold:=true;
ExcelWorkSheet1.Range['B3','B5'].Font.Name := 'Arial';
ExcelWorkSheet1.Range['B3','B5'].Font.Size := 8;
ExcelWorkSheet1.Range['B3','B5'].Interior.ColorIndex :=41;
ExcelWorkSheet1.Cells.Item[3,2].Value := 'este donante cambió de efectivo a tarjeta';

Así puedes colorear de Azul el rango de celdas (B3,B5)
otros colores podrían ser:
Amarillo... 6
Rojo.........3
Verde.......4
Tal vez con esos colores te alcance, el resto lo haces comparando los valores para definir cual de estos colores usar (If .... then)
Espero que te funcione bien.
Saludos

acalderonr 16-05-2003 02:38:31

Hola Ruben_Cu,

SUPER!!!, ya jaló. Mil gracias.

Saludos


La franja horaria es GMT +2. Ahora son las 06:53:07.

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