「vba シート見出しの色を消す」
「excel vba シート見出しの色 無色のコードは」
といった検索で、このサイト・インストラクターのネタ帳へのアクセスがありました。
Excelでは、ワークシートやグラフシート上で右クリックして表示されるショートカットメニューなどから、シート見出しの色を[色なし]に設定することができます。
これと同じことを、VBA(Visual Basic for Applications)から行うコードを探している方による検索です。
全シートのシート見出しを色なしにするサンプルマクロ
参考になりそうなシンプルなマクロをご紹介しておきます。
Dim sht As Object
For Each sht In Sheets
sht.Tab.ColorIndex = xlColorIndexNone
Next
End Sub
上記のマクロを実行すると、アクティブなブックの、全シートのシート見出しの色が、色なしに設定されます。
サンプルマクロの解説
アクティブなブックの全シートに対してループを回して、
For Each sht In Sheets
Tabオブジェクトの、ColorIndexプロパティに、定数・xlColorIndexNoneを指定することで、「色なし」に設定しています。
sht.Tab.ColorIndex = xlColorIndexNone
おそらく「excel vba シート見出しの色 無色のコードは」という検索をした方は、Tabオブジェクトの、Colorプロパティに、RGB関数を使ってRGB値を指定して、シート見出しの色を変更できることをご存知だったはずです。
色なしに設定する場合は、ここでご紹介したようにColorIndexプロパティを使ってください。
最終更新日時:2023-06-15 16:46
Home » エクセルマクロ・Excel VBAの使い方 » Sheets・Worksheet » 全シートのシート見出しを色なしにするExcelマクロ