【Excel】西暦を和暦に変換するマクロ

西暦を和暦に変換するには、Format関数を使います。

例

たとえば、セルB3の西暦日付を和暦に変換するには、次のように記述します。

1 2 3 4 5

Sub GetWareki()       Range("D3").Value = Format(Range("B3"), "ggge年m月d日")       End Sub

実行結果

スポンサーリンク

https://hosopro.blogspot.com/2017/07/excel-vba-wareki-format.html 【Excel】西暦を和暦に変換するマクロ