PDA

Ver la Versión Completa : Color de fondo en celdas de Excel


acalderonr
14-05-2003, 01:58:17
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, 07:23:26
Hola acalderonr, si quieres darle color interior a una celda o rango de ellas prueba usar el código siguiente;


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, 03:38:31
Hola Ruben_Cu,

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

Saludos