※ ChatGPTを利用し、要約された質問です(原文:VBA 工程表(スケジュール表)の作成 複数日程)
VBAで工程表(スケジュール表)を作成する方法
このQ&Aのポイント
VBAを使用してExcelのような工程表(スケジュール表)を作成する方法について調査しています。
工程表には、予定日と実際の日程を複数持ちたい場合がありますが、項目を2つ入れることはできません。
一つの案件に、予定として(5/1~5/10、5/20~5/23)実際も同様だったとします。複数日程を設定する方法を探しています。
お世話になっております。
http://www.syswat.com/soft/ep05kote.html
上記フリーソフト?Excelのようなものを作ろうとしています。
考えていることとして、
D 予定開始
E 予定終了
F 実際開始
G 実際終了
H列:AQ列 カレンダー
というものになっております。
カレンダーの一番左(H列)は今日の日付になっており、
今日の日付から未来35日?間表示させています。
やりたいこととしまして、
1.予定日を複数持ちたい
(シートに書くプログラムでどう行うか。 Vbcrlfなどで判断しても良いが、ユーザーは出来ない)
1.実際 も複数持ちたい
1つの案件に、 予定として (5/1~5/10、5/20~5/23)
実際も同様だったとします。
予定の開始、終了の設定等はありますが
項目を2つ入れることはできません…。
どのように複数日程設定するのが一番でしょうか?
良いかな…と思っているのが、
Selection_ChangeでInputBoxなどを表示させ、日付を入力させます。
入力後、メッセージボックスで「他にもありますか? Yes,NO」みたいなのを表示させて
選択させる…というのが1番かと思いました。
でも、シートプログラムでは、Inputboxできなかったような気がしますし
上手い方法が思いつきません。
このシートは他のブックにコピーして多くの人が使っていく予定です。
何か良い方法があれば、教えて下さい。 よろしくお願い致します。
お礼
回答ありがとうございます! 返信が遅くなり申し訳ありません。 Inputboxできるんですか…! ならInputBoxを使おうか考えて見ます。 フリーソフトのようにUserFormで作ったカレンダーを表示できたら 一番良いとは思うのですが、 色んなシートに、私が作ったシートをコピーしていく予定です。 そのため、もしかしたらコピー2回目で UserFormが2重で入るエラーが出たりしそうな上、 UserFormのコピーは大変だったような意識があるので 考えておりませんでした… セルには日付2つ保持していこうかと考えていたのですが、 難しそうなので、日付を保持するセルを増やそうと思います。 ありがとうございました!
補足
改善策が思いつきましたので 再度、他の内容で質問させていただきます。 ありがとうございました!