Microsoft Access 掲示板

新元号への対応について / 5

6 コメント
views
4 フォロー
5
名前なし 2019/05/17 (金) 10:13:32 fdd23@f966d

できる限り共通項は外に出したいなぁなどと

Format([日付],IIf([日付]>=#2019/05/01#,"令和" & IIf(Year([日付])=2018,"元",Year([日付])-2018),"ggge") & "年m月d日")

先日(2019/5/15)WindowsUpdateが入ってうちのも令和表示されるようになりました。
どうも元年対応は自前でやったほうがよさそうなので

Format([日付],"ggg" & IIf(Format([日付],"e")=1,"元","e") & "年m月d日")
Format([日付],IIf(Format([日付],"e")=1,"ggg元年m月d日","ggge年m月d日"))

このくらいだと無理に分解しない(下段の)ほうが読みやすそう

通報 ...
  • 6
    名前なし 2019/05/22 (水) 08:35:02 90552@f966d >> 5

    ふと見直したら上の式間違ってました。正しくは、

    Format([日付],IIf([日付]>=#2019/05/01#,"令和" & IIf(Year([日付])=2019,"元",Year([日付])-2018),"ggge") & "年m月d日")
    

    2つ目のIIF関数の条件部分をYear([日付])-2018=1から直そうとして・・・