Color de fondo en celdas de Excel

[acalderonr]

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]

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]

Hola Ruben_Cu,

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

Saludos