|
ユーザーフォームで指定する情報は、
・名前
・日付
シートには、
・月のコンボボックスと
・コンボボックスの月に応じた日付が横一列にならんでいる。
日付と氏名が一致するセルに休日と書き込みたい、ということですね。
(ところで、
月が変わったら、前の月の情報は消えてよいのですね。
9月から12月に変わって、また9月に戻すということはないんですね。)
(1)やろうとしていうことを分解すると下記だろうか。
(a)ユーザーフォームに入れた日付(●月○日等)から、月を取り出し、
(b)シートのコンボボックスを更新する
(c)日付と名前をもとに、何行目の何列かを計算する
(d)そのセルに"休日"と書き込む
(2) 上の(a)については、日付の形式が不明なので回答不可。
(3) (b)については、
シートのコンボボックスがActiveXなのかフォームコントロールなのか不明ですが、
たぶん前者。
そのリンクされたセルに、直接、値(月)を書き込めば、
コンボボックスの値は変更できます。
これに応じてカレンダが更新されるはず。
(その月の休日情報をどうするかは問題とされていないと理解)
(4) (c)
名前については、Application.Matchで何番目の行かわかるはず。
日にちについては数えなくてもわかります。
(5)セル範囲をCells(j,k)形式で指定すれば 入力はできるはずです。
今までのコードが書けているなら、上記のことは簡単にできるはずです。
こちらの理解が違っているのも知れないが。
質問にあたってどこに詰まっているのか書かなければ、質問の意味がないです。
私は時間がとれないので、以上とさせていただきます。
|
|