Access VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


3639 / 9994 ←次へ | 前へ→

【9614】カレンダー式スケジュール表について(1)
質問  たまお  - 07/6/26(火) 1:47 -

引用なし
パスワード
   現在、下記クエリを参考にカレンダー式スケジュール表(記入するための画面)を
作成しております。(詳細は条件をご確認願えたらありがたいです)

● クエリの内容
No_連休 ユーザID  場所  所属  姓名 連休名 日01     D01   CC01 T_色.CD・・・・(略)
-------------------------------------------------------------------
65    a0000001  東京  C所属  高橋 冬休み 12/25(木)  ○    1 ビットマップイメージ
70    a0000001  東京  C所属  高橋 春休み 3/25(金)  ×    2 ビットマップイメージ
75    b0000001  大阪  B所属  河野 夏休み 7/25(水)       1 ビットマップイメージ
75    a0000001  東京  C所属  高橋 夏休み 7/25(水)       1 ビットマップイメージ
-------------------------------------------------------------------
日01:日01〜日17 まであり、日付を表示させるためのフィールド
DD01:スケジュールを記入させるためのフィールドで、DD01〜DD17まである。
CC01:色を表示させるための番号  例えば、1と入れたら、T_色.CDのところに
ビットマップイメージが自動入力される。(1は赤、2は白とする) CC01〜CC17まである。


上記のような感じのクエリで、下記のような感じのカレンダー式スケジュール表を
作成したいものです。

● 画面の内容:単票フォーム

◇記入画面の詳細          No_連休,ユーザID ← 不可視
−−−−−−−−−−−−−−−−−−−−−−−−−−−
場所:                      [保存:コマンドボタン]
姓名:                      [閉じる:コマンドボタン]
−−−−−−−−−−−−−−−−−−−−−−−−−−−
過去の連休名 [夏休み |▼] ← コンボボックスで過去の連休を参照する。(cmb_連休)
−−−−−−−−−−−−−−−−−−−−−−−−−−−
   日    月    火 7/25(水) 7/26(木) 7/27(金) 7/28(土) ←日付を表示
[   ] [   ] [   ] [   ] [   ] [   ] [   ] ←スケジュールを記入
7/29(日) 7/30(月) 7/31(火) 8/1 (水) 8/2 (木) 8/3 (金) 8/4 (土)
[   ] [   ] [   ] [   ] [   ] [   ] [   ] ←スケジュールを記入
8/5 (日) 8/6 (月) 8/7 (火) 8/8 (水) 8/9 (木) 8/10(金)    土
[   ] [   ] [   ] [   ] [   ] [   ] [   ] ←スケジュールを記入
   日    月    火    水    木    金    土
[   ] [   ] [   ] [   ] [   ] [   ] [   ] ←記入不要
−−−−−−−−−−−−−−−−−−−−−−−−−−−

● 操作の流れ

例えば、高橋さんがログインした場合、記入画面は、

No_連休 ユーザID  場所  所属  姓名 連休名 日01     D01   CC01 T_色.CD・・・・(略)
--------------------------------------------------------------------------------------------
75    a0000001  東京  C所属  高橋 夏休み 7/25(水)       1 ビットマップイメージ

のみ表示。

そういう流れで進めたいですが、

☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆
やりたいことは、以下4点です。

(1)記入画面が開いた時に最初に表示されるスケジュールは、「No_連休」が一番
大きい数字で、なおかつ、ログインしたユーザのレコードが表示されるものとする。

(2)スケジュール記入の最初の日を、曜日位置に合わせて第1週に埋め込む。
例えば、夏休みのスケジュール記入の最初の日は、7/25(水)です。
それを第1週の、4番目の位置〜17日分表示させたい。

日    月    火 7/25(水) 7/26(木) 7/27(金) 7/28(土) ←4番目の位置に表示したい

で、過去の連休名というコンボボックスでは、過去の連休を参照するわけですが、
もし、「冬休み」を選択した場合は、最初の日は、12/25(木)です。

したがって、

日    月    火    水 12/25(木) 12/26(金) 12/27(土) ←5番目の位置に表示したい

という風に表示したい。

(3)スケジュール記入対象日以外の日は日付を埋め込まない。

(4)画面を閉じる時は非連結に元に戻す。
☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆

上記内容ですが、最初に設定した日の曜日によって、位置が変わることから、
・日付表示用のテキストボックス(名前:日01〜日17)、
・スケジュール記入用テキストボックス(名前:DD01〜DD17)
・色を表示させるためのビットマップ系のコントロール(bb01〜bb17)

を4週間分配置(非連結状態)して、記入する時は、最初の設定日の曜日を確認(日なら日、木なら木)して、
置くべき位置を指定し、その位置から17日分、連結状態にする。

という感じで、上記4点をプログラムで表現したい。

長文になってしまったので、引き続き投稿させて頂きたいと思います。
申し訳ありません。

848 hits

【9614】カレンダー式スケジュール表について(1) たまお 07/6/26(火) 1:47 質問[未読]
【9615】カレンダー式スケジュール表について(2) たまお 07/6/26(火) 2:01 質問[未読]
【9619】Re:カレンダー式スケジュール表について(2) 小僧 07/6/26(火) 13:04 回答[未読]
【9639】Re:カレンダー式スケジュール表について(2) たまお 07/7/1(日) 23:12 お礼[未読]

3639 / 9994 ←次へ | 前へ→
ページ:  ┃  記事番号:
1078201
(SS)C-BOARD v3.8 is Free