This example sets the color palette for the active workbook to be the same as the palette for Book2.xls.
ActiveWorkbook.Colors = Workbooks("BOOK2.XLS").Colors
This example sets color five in the color palette for the active workbook.
ActiveWorkbook.Colors(5) = RGB(255, 0, 0)