運が良ければ、VBAは必要ありません。実際、IFテストを必要としないさらに単純なアプローチがあります。
=DATE(YEAR(NOW()),MONTH(NOW())+(DAY(NOW())>2),2)
質問に基づいて月の2日目をハードコーディングしましたが、セルから取得することも、元の期日から抽出することもできました。
これは、月の目標日を過ぎたかどうかをテストするのではなく、TRUEとFALSEがそれぞれ1と0として扱われるという事実を使用します。(DAY(NOW())>2)
trueまたはfalseのいずれかになるため1
、月の2日を過ぎたか、過ぎ0
なかったかのように扱われます。その日を過ぎた場合、それは1
月に追加されます。
Excelは、これが12月に発生した場合、月「13」を処理するのに十分スマートです。翌年の1月に行きます。
この記事はインターネットから収集されたものであり、転載の際にはソースを示してください。
侵害の場合は、連絡してください[email protected]
コメントを追加