クエリ・フォーム・レポートを更新したときは、次の手順で違うファイルのクエリ等を
更新します。

Accessはご存知のとおり、テーブルにすべてのデータが保存されています。
私の場合、お客さんにAccessファイルをお渡しして、運用してもらっていますが、
何か修正があった場合は、お客さんに渡したファイルを引き取って修正をするのではなく、
そのファイルをコピーして、そのコピーしたファイルを最初に直します。

そうしないとお客さんの業務がと滞ってしまいます。

コピーしたAccessファイルを直したら、その直した
クエリ
フォーム
レポート
を覚えておきます。
続きを読む →

Q原木残数を使って、フォームを作ります。このフォームからは今残っている
原木が、
①何日に仕入れたものが何本残っているのか確認する
②新規に仕入れた原木を入力する
この二つの役割があります。

作成タブのフォームウィザードから、Q原木残数を選び、フォームの形式は表形式
を選択して、フォームを作ります。

作ったフォームにテキストボックスを一つ配置します。
「F原木仕入」としてフォームを保存します。

次に上で作ったフォームを日程フォームから開きます。

原木の残数を表示するテキストボックスのプロパティを開き、イベントタブを選択します。
ここでダブルクリック時に次のコードを入力します。

Private Sub テキスト5_DblClick(Cancel As Integer)
DoCmd.OpenForm “F原木仕入”, , , “原木日付<=#” & Me!日付 & “#”
Forms!F原木仕入!テキスト11 = Me!日付
End Sub

このテキストボックスをダブルクリックすると、下の図のように原木の残数が表示
されたフォームが開き、クリックした日付がテキストボックスに転記されます。

このような方法で、現在の在庫数をそれを構成するフォームを表示して
いつ仕入れた材料がどれくらい残っているのか表示することができます。

＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝
昨日ガラケーを買い替えました。もう電源がほとんど入らず、連絡先の移行するときも
なかなか電源が入らなくて、このまま移せないのではないかと心配しましたが、
最後の力を振り絞ってくれて、何とか連絡先を新規のガラケーに移せました。
7年間私の仕事を支えてくれたガラケーに感謝です。

本日も最後までお読みいただきありがとうございます。

訪問の間隔が必要な期間を過ぎているかどうかの判断をします。

最後に次のフィールドを作ります。

要否: IIf([間隔]>=[最低訪問間隔],”○”,”×”)

あとはこの要否のフィールドをフォームに表示させます。
デザインタブの既存のフィールドの追加をクリックします。

続きを読む →

活動記録から本日からその得意先に最後に訪問した日をもとめて、
その差の日数を求めます。

最後の訪問日と間隔を求めるクエリです。

まずはDMax関数で得意先毎の最後の訪問日を活動記録のデータから求めます。
次にDatediff関数を使って、今日（date()）との差を求めます。
dateの()は必ず付けてください。
続きを読む →

活動記録を名刺データのフォームから確認できるようにします。
情報はできるだけ一つにまとめた方が、あっちこっち移動する必要が
ないので、できればそういう仕組みにしたいところです。

最初に活動記録一覧フォームをコピーして、名前を変えて保存します。

デザインビューを開いて、上の図のように得意先名と担当者を削除します。
続きを読む →

入力した活動記録を、一覧で表示して検索しやすくします。

最初にクエリの設定。
図のようにフィールドを設定します。日付のところは降順にしておけば、新しい
データが上にきます。

続きを読む →

名刺を一覧で検索できるようにしたら、その方との活動の内容を登録し、
あとからどのような経緯で付き合いがあるのか、分かるようにします。

最初に活動記録を入れるテーブルを作ります。

IDは名刺データのIDと関連付けするために作成します。あとはタイトルがあってもいいかなと思います。
続きを読む →