엑셀 매크로 - 그라데이션

특정 값의 범위를 글꼴 색(A열 참조) 또는 채우기 색(B열 참조) 의 그라데이션을 입혀서 강조하려고 할때 사용한다.

 

 

예제 코드

Sub test_그라데이션()
    Cells.Clear
    
    Range("a1:b10") = "Yield"
    Range("a1:b10").Interior.ColorIndex = 30
    Dim i As Integer
    For i = 1 To 10
        Range("a" & i).Font.TintAndShade = 0.1 * (11 - i)
        Range("b" & i).Interior.TintAndShade = 0.1 * i
    Next
    Range("a1:b10").Borders.ThemeColor = 1
End Sub