Excel VBA 日付の増減を行うDateadd関数のポイントとサンプルコード

2024年3月10日 2024年11月26日

Excel VBAの Dateadd関数は、日付に対する操作を行うに使います。使い方や注意点など、サンプルコードをもとに具体的に解説します。

基本的な文法やVBAの実践的な応用までを網羅的に学習できる方法は、ExcelVBAエキスパート資格の取得を目指すこと。学習を通して、より効率的に、着実に基礎を身につけることが可能です。資格取得すれば、スキルの証明にもなり、職場での評価アップにも繋がるため、勉強を進めるモチベーションにもなります。
本サイト参考：マクロ知識がないから「何から学べば良いのかわからない」という人におすすめの記事

Excel VBA 日付の増減を行うDateadd関数の利用

以下のようなシーンで利用されます。

・日付の増減を行う場合。

・特定の日数、月数、年数を加算または減算して新しい日付を得る場合。

ポイント

NewDate = DateAdd(interval, number, date)

intervalは、加算または減算する単位を指定します。例えば、日を表す場合は "d"、月を表す場合は "m"、年を表す場合は "yyyy" などがあります。

numberは、加算または減算する数値を指定します。正の値なら加算、負の値なら減算が行われます。

dateは、基準となる日付を指定します。

・日付の加算や減算において、月や年を考慮する場合、暦の違いによる注意が必要です。

Excel VBA 日付の増減を行うDateadd関数サンプルコード

Sub ExampleDateAdd()
    ' 現在の日付を取得
    Dim currentDate As Date
    currentDate = Date
    
    ' 10日後の日付を計算
    Dim futureDate As Date
    futureDate = DateAdd("d", 10, currentDate)
    
    ' 1ヶ月前の日付を計算
    Dim pastDate As Date
    pastDate = DateAdd("m", -1, currentDate)
    
    ' 結果を表示
    MsgBox "Current Date: " & currentDate & vbCrLf & _
           "Future Date (10 days later): " & futureDate & vbCrLf & _
           "Past Date (1 month ago): " & pastDate
End Sub

サンプルコードは、DateAdd を使用して現在の日付から10日後と1ヶ月前の日付を計算しています。

Excel VBAで自動化するコードのベースを習得したい方におすすめ！

VBAエキスパート資格は、日常業務でExcelを多用し、手動作業を減らしたいと考えている方には価値あるものです。

ExcelVBAエキスパートベーシック
仕事の効率をあげるためにExcelVBAを利用する人が対象の問題集です。

Excel VBAベーシック問題集

ExcelVBAエキスパートスタンダード
ExcelVBAの開発を仕事にする人が対象の問題集です。

ExcelVBAスタンダード問題集

Excel VBA エキスパート資格について知りたい方は、下記「Excel VBAスキルアップを目指すなら知っておきたいVBAエキスパート」をご確認ください。