VBA で ColorIndex を一覧する

VBA で色を指定したいときに，ColorIndex 値がわからなくて，ネットで調べるっていうシチュエーションは結構あると思う．VBA あるある．そういうときは，ColorIndex 一覧 Excel を作成しておいて，すぐに開けるようにしておくと便利！

Sub ColorIndex一覧取得()
    For i = 1 To 56
        Range("A" & i + 1) = i
        Range("B" & i + 1) = "ABCDE"
        Range("B" & i + 1).Font.ColorIndex = i
        Range("C" & i + 1).Interior.ColorIndex = i
    Next i
End Sub

関連記事

www.relief.jp