【エクセルVBA】色指定はインデックス番号が便利

ExcelVBA

エクセルVBAは、

エクセルカラーパレットのインデックス番号で

色指定をすることができます。

カラーパレットには56色が登録されています。

その56色に、1~56の番号がふられており、その番号で色指定ができます。

使い方は簡単です!

 

フォントの色指定

range("A1").Font.ColorIndex = 8 ← この数字が色のインデックス番号です。8は水色

背景の色指定

range("A1").Interior.ColorIndex = 8

↓カラーパレットの一覧になります。

 

 

 

 

 

 

 

 

 

表は、↓のコードで書いています。

Sub colorindex()

 Dim i As Integer

    For i = 1 To 28
 
        Cells(i, 1).Value = i '1列目に1から数字を記入
        Cells(i, 2).Interior.colorindex = i '2列目に1の色から背景色
        
        Cells(i, 3).Value = i + 28 '3列目に29から数字を記入
        Cells(i, 4).Interior.colorindex = i + 28 '4列目に29の色から背景色
        
    Next i
    
End Sub

 

 

シバマメのラインスタンプ販売中です!

 

↓よろしければクリックお願いします🌼
ブログランキング・にほんブログ村へにほんブログ村






コメント

タイトルとURLをコピーしました