• ベストアンサー

日付ごとのシートがあり、

日付ごとのシートがあり、 もしシートのA1に入力があれば、そのシートの見出しの色を赤に変える事ができますか。

質問者が選んだベストアンサー

  • ベストアンサー
  • mu2011
  • ベストアンサー率38% (1910/4994)
回答No.1

VBA(マクロ)ならば可能です。 サンプルコード Sub シート見出し色付け() For i = 1 To Sheets.Count If Sheets(i).Range("A1") <> "" Then Sheets(i).Tab.ColorIndex = 3 Else Sheets(i).Tab.ColorIndex = xlNone End If Next End Sub

関連するQ&A