シート見出しの色を設定
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ソース
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 |
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 |
実行結果
