Access VBA質問箱 IV

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

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


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

4288 / 9994

←次へ　｜　前へ→


	【8953】リポートのフォーマットについて

ひろ

- 07/1/10(水) 0:37 -


	引用なし

	パスワード

表形式のリポートでフォーマット時に、各レコードに工期初と工期終があり、５０日分のテキストボックスを作りました。ＶＢで工期期間を色を塗ってみたいのですが、みんな同じ色になってしまいます。どなたか良い知恵はありませんか。

If Not Me!工期始 Then
　　ks = Me!工期始
Else
　　ks = Now
End If

Dim ke As Date
If Not Me!工期終 Then
　　ke = Me!工期終
Else
　　ke = Now + 20
End If

If Me!k >= ks And Me!k < ke Then
　　Me!d01.BackColor = vbBlack
　　Me!d02.BackColor = vbBlack

End If

If Me!k1 >= ks And Me!k1 < ke Then
　　Me!d11.BackColor = vbBlack
　　Me!d12.BackColor = vbBlack

このMe!k が連番になっていて５０あります。
　最初のレコードにある工期だけがks,keに入っているだけで２番目の工期は
　入っていません。

234 hits

▼

【8953】リポートのフォーマットについて ひろ 07/1/10(水) 0:37

≪