新元号対応 日付変換関数(EraFormat/EraCDate)はマイクロソフトのエクセルで
新元号への対応が無いエクセルでも、新元号の和暦日付編集/変換を可能にする関数。
このテンプレートは令和版に更新しました。
以下より移動お願いします。
エクセル新元号対応 日付変換関数(EraFormat/EraCDate)の無料ダウンロードはこちら
※以下は旧ダウンロードの説明です。
フリーソフト（無料です）
作者：角田さん
動作OS：Windows 10/8/7/Vista/XP/Me/2000/NT/98
エクセル2016, 2010SP2, 2007SP3, 2003SP3
来年(2019年)５月１日に平成 から新元号への改元が行なわれます。
(現時点での政府方針では新元号の公表は「１ヶ月前 を想定 」としています)
マイクロソフトの発表では、新元号が公表され次第、
Office2010以降の製品に対して、
新元号対応アップデートのネット配信を行なうとの事です。
参照 ： Microsoft 新元号サポートブログ
そうしますと、Office2007以前の環境では
新元号＆和暦年の表示/変換が行なえず、『平成』のままとなります。
また、
Office2010以降の環境でも諸々の事情により
アップデートが施されない場合には、
同じように新元号＆和暦年の表示/変換が行なえません。
そこで、新元号に未対応な環境においても「新元号＆和暦年の表示/変換」が
行なえるように変換関数【 EraFormat / EraCDate 】を作成。
(尚、kt関数アドイン Ver 5.30 にも ktEraFormat/ktEraCDate の名前で収録します）
セル上のTEXT関数/マクロ内のFormat関数を差し替えるだけ
（[引数/編集文字の定義]はそのままで、関数名のみ書き換え）で利用できます。
但し、当然ですが「セルの書式設定」の定義には利用できません。
=TEXT(日付 , “本日は yyyy(ggge)年m月d日 (aaaa) です”) ・・・ セル内の式
Format(日付 , “本日は yyyy(ggge)年m月d日 (aaaa) です”) ・・・ ＶＢＡマクロ
⇒ EraFormat(日付 , “本日は yyyy(ggge)年m月d日 (aaaa) です”)
※ 編集文字は そのまま 同じものが使えます。
これよって、新元号 が未対応な環境で「本日は2019(平成31)年5月1日(水曜日)です」
という表示が 「本日は2019(●●1)年5月1日(水曜日)です」という表示に変わります。
UserForm 等で入力された日付文字列のチェック＆シリアル値変換には
EraCDate 関数を利用してください。