Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Setting Colors Using Other Than ColorIndex?
I'm in MS Access VBA and want to format a totals break line
e.g. ----------------------------------------------------------------------------------------- 18140 With .Range(.Cells(theBreakRowNum, mColNum_FirstData), .Cells (theBreakRowNum, mColNum_LastData)) 18141 .Interior.ColorIndex = theBackColor 18142 .Borders(xlEdgeTop).Weight = xlMedium 18143 .Borders(xlEdgeBottom).Weight = xlMedium 18149 End With ----------------------------------------------------------------------------------------- Right now, I'm passing an Excel "Color Index" like 10 for bright red or 15 for light grey. But now I'd like to add a color picker so the user can specify which colors to use for which totals. Problem is that my implementation of said color picker returns numbers like 255 for bright red or 16119285 for light grey. Question: Is there some other property I can set besides .Interior.ColorIndex that will accept those color numbers and render accordingly? |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Setting Colors Using Other Than ColorIndex?
use .Interior.Color
sample Option Explicit Enum eCOls LightGrey = 16119285 BrightRed = 16119285 End Enum Sub test() With .Range(.Cells(theBreakRowNum, mColNum_FirstData), ..Cells(theBreakRowNum, mColNum_LastData)) .Interior.Color = eCOls.LightGrey .Borders(xlEdgeTop).Weight = xlMedium .Borders(xlEdgeBottom).Weight = xlMedium End With End Sub "PeteCresswell" wrote in message ... I'm in MS Access VBA and want to format a totals break line e.g. ----------------------------------------------------------------------------------------- 18140 With .Range(.Cells(theBreakRowNum, mColNum_FirstData), .Cells (theBreakRowNum, mColNum_LastData)) 18141 .Interior.ColorIndex = theBackColor 18142 .Borders(xlEdgeTop).Weight = xlMedium 18143 .Borders(xlEdgeBottom).Weight = xlMedium 18149 End With ----------------------------------------------------------------------------------------- Right now, I'm passing an Excel "Color Index" like 10 for bright red or 15 for light grey. But now I'd like to add a color picker so the user can specify which colors to use for which totals. Problem is that my implementation of said color picker returns numbers like 255 for bright red or 16119285 for light grey. Question: Is there some other property I can set besides .Interior.ColorIndex that will accept those color numbers and render accordingly? |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
Setting Colors Using Other Than ColorIndex?
Per Patrick Molloy:
use .Interior.Color sample Option Explicit Enum eCOls LightGrey = 16119285 BrightRed = 1611928 Thanks.... Also for the "Enum" syntax. I never got into using Enums - using constants like "gExcelColor_Blue", "gExcelColor_Red".... An Enum for "ExcelColor" makes a lot more sense and, I'm assuming, brings AutoCompletion into the picture. -- PeteCresswell |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
need codeto view the 56 colors of ColorIndex | Excel Programming | |||
VBA Error setting Font.ColorIndex | Excel Programming | |||
What are the values for ColorIndex 's 56 colors ? i.e. green=3 . | Excel Programming | |||
WHere can I find a list of ColorIndex colors? | Excel Programming | |||
EXCEL VB Macro Run Time Error 1004 - Setting ColorIndex | Excel Programming |