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

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

例

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

Sub GetWareki()

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

実行結果

comments powered by Disqus

スポンサーリンク

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