Excel - Get color code

October 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 10 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.