Excel - Get color code

December 2016

You can make use of this macro to get the color code:

Sub distri_color()  
Dim i
For i = 1 To 12
Worksheets(1).Range("C" & i).Value = Worksheets(1).Range("B" & i).Interior.Color
Next i
End Sub
  • 'Replace 12 by the number of rows you want to use.
  • 'Replacing the I in the column that you want to use for the result (color code).
  • 'Replace the B by the column containing the color you want to filter.

Related :

This document entitled « Excel - Get color code » from CCM (ccm.net) is made available under the Creative Commons license. You can copy, modify copies of this page, under the conditions stipulated by the license, as this note appears clearly.