エクセルのSheetタブの色 について

質問

エクセルのSheetタブで、アクティブになっているSheetが色で分かるようにしたいのですが、どうしたら良いでしょうか？
現在は、どのSheetタブも白くなっており、手作業で色をつけ、アクティブを白・それ以外を色付として、見やすいように再設定しています。
以前は、もとからSheetタブに薄く灰色になっており見やすかったのですが。エクセルは２００２です。
よろしくお願いします。

回答No.2

BLUEPIXY

>オプションとか設定を変えるだけで対応はできませんでしょうか？
エクセル上では、そういう設定を変えるオプションはないと思います。

回答No.1

BLUEPIXY

私も、２００２を使っていますが、アクティブが白でそれ以外は、列・行見出しと同じ色になっています。
それで、それほど、見にくいとは思いませんが、
ＶＢＡで設定することで、アクティブ以外のシートに色を付けることができます。
Private Sub Workbook_SheetActivate(ByVal Sh As Object)
Dim sheet As Worksheet
For Each sheet In ActiveWorkbook.Sheets
If (Sh.Name <> sheet.Name) Then
Sh.Tab.Color = RGB(204, 255, 204)
End If
Next
End Sub
ＡＬＴ＋Ｆ１１でThisworkbookを選んで
workbook
sheetActivate
を選んで、上の関数の中身の部分をコピペして下さい。
色は
RGB(Red,Green,Blue)で１０進数で書きます

お礼

お返事ありがとうございます。
もっと簡単に、オプションとか設定を変えるだけで対応はできませんでしょうか？