2019/05/01より新元号「令和」となりました。
しかし、Microsoftによる新元号対応は完全には期待できません。
一応、徐々に、Windows及び、Excel等のOffice製品への対応パッチ配信は進んでいるようです。
しかし、過去の大トラブルでWindowsUpdate自体を停止させているお客様もいます。
トラブルパッチの例
「Microsoft Excel 2010」向け「KB4461627」
「Office 2010」向け「KB4032217」
「Office 2010」向け「KB4032225」
「Office 2010」向け「KB4461616」
また、セキュリティ的にはちょっと問題ありますが、サポート終了となったOffice 2007を使われているお客様もおります。
－－－－－
そこで、仕方ないので、”令和”で日付を表示するExcel計算式を考えてみました。
例１：指定セル「Ａ４」の日付を「令和」の日付に変換
=IF(Ａ４>VALUE("2019/4/30"),
CONCATENATE("令和",IF(YEAR(Ａ４)=2019,"元",YEAR(Ａ４)-2018),"年",MONTH(Ａ４),"月",DAY(Ａ４),"日"),
TEXT(Ａ４,"ggge年m月d日")
)
例２：Ｔｏｄａｙ（）関数の代わり
=IF(TODAY()>VALUE("2019/4/30"),
CONCATENATE("令和",IF(YEAR(TODAY())=2019,"元",YEAR(TODAY())-2018),"年",MONTH(TODAY()),"月",DAY(TODAY()),"日"),
TEXT(TODAY(),"ggge年m月d日")
)
－－－－
急きょ作成したものなので、問題あればご指摘ください。