VBA DateAdd関数で一定間隔加算した時間を取得

DateAdd関数で一定間隔加算した時間を取得

Sub test()

　　' DateAdd関数で一定間隔加算した時間を取得

    Cells(2, 1) = "2024/7/9  10:01:00"


    Cells(2, 3) = DateAdd("d", 1, Cells(2, 1))
    Cells(3, 3) = DateAdd("m", 2, Cells(2, 1))
    Cells(4, 3) = DateAdd("yyyy", 3, Cells(2, 1))
    Cells(5, 3) = DateAdd("h", 4, Cells(2, 1))
    Cells(6, 3) = DateAdd("n", 5, Cells(2, 1))
    Cells(7, 3) = DateAdd("s", 6, Cells(2, 1))
    Cells(8, 3) = DateAdd("h", 7, Cells(2, 1))

    Cells(9, 3) = DateAdd("d", -1, Cells(2, 1))

End Sub

実行結果

― ― ― ― ― ― ― ― ― ― → Excel VBA基礎入門もくじ へ戻る 

参考記事

『VBA データの操作　オートフィルター』

『VBA オートフィルター　データが絞り込んでいるか判断方法』

『VBA　フィルターで特定文字を含むデータを抽出』

『VBA 色で絞り込む方法』

『VBA 最終行・列の取得』

『VBA　セルに数式を入力・取得』

『VBA 連続データの作成　AutoFillメソッド』

『VBA セル選択範囲の変更 Resizeプロパティ』

『VBA セル入力規則の設定（Validation）』