Excel: ottieni il codice colore

Puoi usare questa macro per ottenere il codice colore:

 Sub distri_color ()
Dim i
Per i = 1 a 12
Fogli di lavoro (1) .Range ("C" & i) .Value = Worksheets (1) .Range ("B" & i) .Interior.Color
Avanti
End Sub 

• 'Sostituisci 12 dal numero di righe che vuoi usare.
• 'Sostituire la I nella colonna che si desidera utilizzare per il risultato (codice colore).
• 'Sostituisci B per la colonna contenente il colore che vuoi filtrare.