エクセル：シートのタブをクリックすると自動で実行されるマクロ

質問

よろしくお願いします。
あるエクセルファイルの
「リスト作成」というシートを選ぶ（そのタブ（見出し）をクリック）するだけで、

◆『自動で、そのシート（リスト作成）のセルC4に【=IF($B$6=1,YEAR(TODAY())+1,YEAR(TODAY()))】という計算式を入れるマクロを作りたい』

のです。ご指導ください。お願いします。

回答No.1

merlionXX · ベストアンサー

「リスト作成」というシートのモジュールに

Private Sub Worksheet_Activate()
Range("C4").Value = "=IF($B$6=1,YEAR(TODAY())+1,YEAR(TODAY()))"
End Sub

と記入してみてください。

お礼

merlionXXさん、いつもありがとうございます。
できました。またまた感激です。なんてシンプルにできるのでしょうか！！ありがとうございました。感謝いたします。