Microsoft Access 掲示板

Microsoft Access 掲示板

締日・支払期日をユーザー定義関数で作りたい / 9

11 コメント
149 views
4 フォロー
9
beginner 2025/02/19 (水) 16:05:03 61dd6@f300d

その後、期日の方も下記で出来ました（少し苦労しましたが）
”Function 支払期日(支払月間 As Variant, 支払日間 As Variant, 締め日付 As Date, 支払実日 As Variant) As Date

      If IsNull([支払月間]) Then
           支払期日 = DateAdd("d", [支払日間], [締め日付])
      Else
           支払期日 = DateSerial(Year([締め日付]), Month([締め日付]) + [支払月間], [支払実日])
           If [支払実日] = 0 Then 支払期日 = DateSerial(Year([締め日付]), Month([締め日付]) + [支払月間] + 1, [支払実日])
      End If

End Function”

hirotonさん色々と貴重なｱﾄﾞﾊﾞｲｽありがとうございました。hatenaさんも毎回ありがとうございます。

通報 ...