|
返信遅れて申し訳ございません。
昨日の質問の説明が全然足りず大変申し訳ございません。
ご指摘をいただいたので、詳しく書いていきます。
一年の休暇予定表を作成しています。
まずカレンダーですが、B4からAF4まで横に日付が並んでいます。この下のセルに曜日があります。月はK1にコンボボックスで選択できるようになっています。コンボボックスは開発タブより作っています。
各個人の名前はA7からA21まで縦に並んでいます。
ユーザーフォームで名前と取りたい休日の月と日にちを入力すると、まずシート上の月のコンボボックスに入力した月が代入されます。ここで月が変わります。そして名前と日にちが一致するセル(列と行)を検索し、一致したセルに色を付けます。
現在行詰まっているのは、シート上の月のコンボボックスを変更したとき(例9月から12月に変えた時)、変えただけではセルに付いた色はそののままです。一年間の予定表なので、月を変えるごとに色付きのセルを表示させたいです。(9月なら9月の休暇予定表を表示させる)
私がやってみたことは、Range("B7:Af21")を範囲選択して、12個の変数を用意し、9月ならsepという変数に代入します。シート上のコンボボックスが9月を選択されたらシートのRange("B7:Af21")にsepを代入するという方法です(これは他の月でも同じです。)
実行してみると、B7:AF21が真っ黒になってしまいます。ネットで検索してみたところ、範囲取得はできないようでした。
結論としては、月ごとに色付きのセル(休暇予定日)を表示させることです。
行詰まっているのが、シート上のコンボボックスを変えたとき、その月の休暇予定日を変数に記憶させて、選択した月の休暇予定日が入っている変数を呼び出し表示させることです。月を白紙に戻す訳ではなく、記憶させて一度シートを白紙にしてから表示させるという意味です。
|
|