スポンサーリンク

2016年1月21日木曜日

ヘッダー・詳細・フッターの各セクションの背景色を変更する

Access2013で、ヘッダー・詳細・フッターの各セクションの背景色を変更する方法です。

変更前のフォームです。
このヘッダー・詳細・フッターの背景色を変更します。
ヘッダー・詳細・フッターの背景色を変更

デザインビューにします。

1.変更するセクション名が表示されている部分をクリックし選択します。
2.プロパティシートの[書式]タブ-[背景色]で色を選択します。
[書式]タブ-[背景色]で色を選択

ヘッダー・詳細・フッターの各セクションの背景色を変更しました。
ヘッダー・詳細・フッターの各セクションの背景色を変更

変更結果のフォームビュー画面です。
変更結果のフォームビュー画面

関連する記事
テキストボックスやラベルなどのコントロールの背景色を変更する
データシートビューの背景色を変更する
罫線の色を変更する
指定した数値以下が入力されると入力枠の色を変更する

2016年1月18日月曜日

1日でも過ぎると経過月数を+1する

Access2013で、1日でも過ぎると経過月数を+1するようにします。

下の登録日から今日の日付までの経過月数を求めます。
実施した今日の日付は「2016/01/18」です。
登録日から今日の日付までの経過月数を求める

普通にDateDiff関数を使い経過月数を求めてみます。 式は下記になります。

経過月数1: DateDiff("m",[登録日],Date())
DateDiff関数を使い経過月数を求める

実行結果です。

・2016/01/10 は8日経過しているのに「0」になっています。
・2016/01/17 は1ヵ月と1日経過しているのに「1」になっています。
実行結果

そこで下記の式を追加します。

経過月数2: DateDiff("m",[登録日],Date())+IIf(Day([登録日])<Day(Date()),1,0)
下記の式を追加

実行結果です。
・2016/01/10 は8日経過しているので「1」になりました。
・2016/01/17 は1ヵ月と1日経過しているので「2」になりました。

これで1日でも過ぎると経過月数を+1することができました。
1日でも過ぎると経過月数を+1する

クエリでDatediff関数を使う
生年月日から年齢を計算する
時間の計算をする
今日の日付を自動入力する
一ヵ月後・一週間後の日付を計算し表示させる方法
日付が1年以上経過したレコードを削除する
日付と期間で抽出するクエリを作成する
Betweenを使い、日付の期間で抽出する