シート見出しの色を設定（Tab プロパティ）

2015/10/29 2016/01/12

シート見出しの色を設定

Tab オブジェクトの Color プロパティ、ColorIndex プロパティ、ThemeColor プロパティ などを使用するとワークシートやグラフのシート見出しの色を設定することができます。

Tab プロパティ

【書式】

object.Tab

引数・戻り値

object ・・・対象となる Worksheet オブジェクト、Chart オブジェクトを指定します。

Tab.Color プロパティ

【書式】

＜取得＞
object.Color

＜設定＞
object.Color = rgb

引数・戻り値

object ・・・対象となる Tab オブジェクトを指定します。
rgb ・・・ RGB 値を指定します。また、False を設定すると、シート見出しの色の設定を解除することができます。

Color プロパティ に関しては、色の設定（Color プロパティ・RGB 関数）を参照してください。

Tab.ColorIndex プロパティ

【書式】

＜取得＞
object.ColorIndex

＜設定＞
object.ColorIndex = index

引数・戻り値

object ・・・対象となる Tab オブジェクトを指定します。
index ・・・ カラーパレットの色を表す 1 ～ 56 のパレット番号、または、XlColorIndex 列挙型 の定数またはその値を指定します。

定数値内容

xlColorIndexAutomatic -4105 自動設定

xlColorIndexNone -4142 シート見出しの色の設定を解除

ColorIndex プロパティ に関しては、色の設定（ColorIndex プロパティ・Colors プロパティ）を参照してください。

Tab.ThemeColor プロパティ・Tab.TintAndShade プロパティ

【書式】

＜取得＞
object.ThemeColor
object.TintAndShade

＜設定＞
object.ThemeColor = index
object.TintAndShade = single

引数・戻り値

object ・・・対象となる Tab オブジェクトを指定します。
index ・・・テーマカラーの基本色を表す MsoThemeColorSchemeindex 列挙型（または XlThemeColor 列挙型）の定数または値（1 ～ 12）を指定します。
single ・・・色の明るさを -1（暗い） ～ 1（明るい）で指定します。

Tab.ThemeColor プロパティ、Tab.TintAndShade プロパティ に関しては、色の設定（ThemeColor プロパティ・TintAndShade プロパティ）を参照してください。

Tab.ThemeColor プロパティ、Tab.TintAndShade プロパティ は、Excel 2007 以降のバージョンでのみ使用できます。

Tab プロパティ使用例

サンプルVBAソース

　
Sub Sample_Tab()

    Dim i As Long
    
    For i = 1 To Worksheets.Count
    
        If i Mod 2 = 0 Then
        
            '左から偶数番目のシートの見出しの色の設定を解除
            ActiveWorkbook.Worksheets(i).Tab.Color = False
        
        Else
            
            '左から奇数番目のシートの見出しの色を青にする
            ActiveWorkbook.Worksheets(i).Tab.Color = RGB(0, 0, 255)
        
        End If
    
    Next i
    
End Sub