Excel - En makro for å få tilsvarende numeriske koder for farger

Denne makroen lar deg få en fargekode, du kan endre den til din bekvemmelighet:

 Subdistri_color () Dim Lign As Integer For Lign = 1 til 12 regneark (1) .Range ("C" & Lign) .Value = Regneark (1) .Range ("B" & Lign) .Interior.Color Next End End Under 

• 'Erstatt 12 av antall linjer du vil behandle.
• 'Erstatt' C 'etter kolonnen du vil bruke til resultatet (fargekode).
• 'Erstatt' B 'ved kolonnen som inneholder fargen som skal filtreres.