Macro to Create Specific color palette boxes for Quick Access Toolbar

You will need a different macro for each color.

To use color index for gold, create a sub like this in a generic module (like Module1) then create buttons in your QAT that are associated with the macros. Unfortunately, since 2007 the images used for the QAT buttons themselves cannot be customized.

Public Sub FillGold()
   Selection.Interior.ColorIndex = 45
End Sub

Your numbers are color index numbers and can be customized so they may not be the same on different versions of Excel and different machines. It is more portable to use RGB numbers. To use the RGB numbers:

Public.Sub FillGold()
   Selection.Interior.Color = RGB(255, 153, 0)
End Sub

You will have to derive the RGB numbers for each color if you want to do this. I wrote some code that creates samples of each color in the palette:

Private Sub test()

   Dim i As Long
   For i = 1 To 256
   Cells(i, "A").Interior.ColorIndex = i
   Next i

End Sub

Then you can open the Fill Color dialog, in Custom, to see the RGB numbers.