エクセルの日付自動入力について教えてください。

質問

エクセルの日付自動入力について教えてください。

商品の出荷情報をエクセルで作成しています。毎週月～土曜日の顧客管理を作成しており、
商品を出荷した日付が自動的に更新されるようにしたいです。

例えば、
現在今週の月曜出荷の情報だと、A1セルに6/21と手入力し、
21日が過ぎた時点(翌日22日に)に翌週の日付6/28という日付を手入力(A1セルに上書き)している状況です。この翌週の日付を自動的に同じA1セルに上書きという形で反映させることは可能でしょうか。

説明が分かりにくくて大変申し訳ございません。
データが大量にあるため、なるべく自動的に反映させたいです。

関数入力でこのようなことができるのか、ご存知の方宜しくお願い致します。

回答No.2

muunoy · ベストアンサー

３００件程度であれば、関数でも問題なさそうです。

少々複雑になってしまったので、不明点はお手数ですが、再度ご質問ください。
また、関数についてよく理解していないと、管理が難しいかもしれませんので、くれぐれもご注意を。

このような処理ではいかがでしょうか？
(1)　TODAY関数で当日の日付を取得する
(2)　WEEKDAY関数で、当日の曜日を表す数値を取得
(3)　(2)で取得した数値をもとに最終配達日・次回配達日を計算する

以下、数式とそのご説明です。
A1セルに=TODAY()と入力されていることを前提として、
月曜日には、最終配達日と次回配達日が両方とも当日の日付になるような例です。
※テスト時は、A1セルの日付を書き換えて行ってください。
※もし実用に耐えうるようであれば、A1に=TODAY()を入力したまま、
例の数式を、任意の曜日設定に変更してコピーすれば良いと思います。
また、ツール→オプション→計算方法　計算方法が自動に設定されていなくてはなりません。

【月曜日出荷の数式の例】
最終配達日=$A$1-IF(WEEKDAY($A$1)<2,7-2+WEEKDAY($A$1),WEEKDAY($A$1)-2)
次回配達日=$A$1+IF(WEEKDAY($A$1)<=2,2-WEEKDAY($A$1),7+2-WEEKDAY($A$1))

数式中の2は、WEEKDAY関数で取得される月曜日を表す数値です。
例の数式にある2を以下の表にしたがって曜日の数値に置き換えることができます。
WEEKDAY関数の曜日
日→1/月→2/火→3/水→4/木→5/金→6/土→7

直接EXCELのシートでやりとりできれば、伝えやすいのですがこのサイトでは難しいですね…

お礼

とても丁寧に解説いただき、ありがとうございます！
教えていただいた方法で一度やってみたいと思います。

また何かございましたら、何卒宜しくお願いいたします。

回答No.1

muunoy

大量データですと、関数では「上書き」処理を実現するのは厳しいかもしれませんよ。
現在日付と処理済か否かを判別して、マクロで日付を一括で上書きする方が良いかも知れません。

サンプルシートか何かがあって、一連の処理の流れをもう少し詳しく教えていただければ、参考になる情報をご提供できるかもしれません。

補足

ありがとうございます。

マクロとかの世界になってしまうのですね、マクロの知識が全くないため
何とか関数でできないかと考えておりました。

画像の、"最終配達日"という項目の日付が自動的に上書きされるようにしたいと
考えております。"次回配達日"は最終配達日の"日付+7"で翌週の日付を入れるようにしています。

このデータ処理を300件ほど入力しなければならないため、困っています。