リンクユニット

Windows7 & Office2010 Access2010

変更履歴テーブルの作成

投稿日:2017年1月7日 更新日:

追加クエリを使用して、テーブルに変更履歴を残す方法です。
テーブル

[T_売上]テーブルは、下のようになっています。[ID]が主キーとなっています。
デザインビュー

売上履歴テーブルの作成

この[T_売上]テーブルをコピーして、[T_売上の履歴]テーブルを作成します。[ID]の主キーは削除して、重複のレコードが保存できるようにします。
履歴テーブル作成

[F_帳票]フォームの[開く]ボタンをクリックすると[F_単票]フォームが開くように設定しています。
これについては、帳票フォームから単票フォームを起動するにはを参照してください。

帳票フォームから単票フォームを起動するには

Accessで、帳票フォームから同じIDの単票フォームをボタンで起動する方法を解説します。画像は、Acess2010ですが、他のバージョンで ...

続きを見る

この[F_単票]フォームで[担当者]や[数量][商品]を変更したら、更新日時が自動取得され、そのデータが[T_売上の履歴]に保存されるようにします。
単票フォーム

[更新日時]が自動的に取得されるように[担当者][数量][商品]コントロールの[更新後処理]イベントに以下のように入力します。
VBA

追加クエリの作成

追加クエリを作成します。[T_売上]テーブルを元に下のように設定します。[デザイン]タブにある[クエリの種類]グループにある[追加]ボタンをクリックします。[追加]ダイアログボックスで[追加先]の[テーブル名]に[T_売上の履歴]を選択します。[OK]ボタンをクリックしてクエリに名前を付けて保存します。
追加クエリ

マクロの作成

[追加クエリ]を実行するためのマクロを下のように作成します。
マクロ

このまま[F_単票]の更新後処理にマクロを指定してもいいのですが、このままだと
プロパティシート 更新後処理

[追加クエリを実行すると、テーブルのデータが変更されます]と[1件のレコードを追加します]という、以下のメッセージがクエリを実行する度に表示されるようになります。
メッセージウィンドウ

メッセージウィンドウ

マクロの編集

面倒なので、マクロを下のようの編集します。マクロは右側にマウスをポイントすると[↑][↓]の矢印が表示されますので、この矢印で順番を変更することができます。
アクションクエリ実行時の確認メッセージを非表示にするも参考になると思います。
履歴 マクロ

テーブル[T_売上の履歴]を表示すると、下のようにデータを更新したレコードが追加されています。[更新日]がないレコードは削除するように削除クエリもマクロに取り込むといいですね。また、このテーブルを元にフォームを作成し、ボタンをクリックして履歴を閲覧できるようにすると、より便利です。
履歴テーブル

参考Officeのバージョンによって操作が異なる場合があります。以下の記事で、お使いのOfficeのバージョンを確認する方法を解説しています。

Office(Word、Excel、PowerPointなど)のバージョンを確認する方法

Microsoft Officeも時を得て、大きく様変わりしてきました。トラブルを解決しようとするとき、あるいは、何かの操作を探すときなど、 ...

続きを見る

管理人一押しのテキストです。

おすすめ記事と広告

記事を更新しました

追加クエリ

1つのテーブルに別のテーブルのレコードを追加する方法です。 [6月]と[7月]のテーブルがあって、各テーブルのフィールド名は同じです。6月の ...

系列の重なり

下のようなグラフがあって、隣り合っている系列を少し重ねて表示したい場合の設定方法です。 データ系列の書式設定を表示 系列で右クリックして、[ ...

Insertキー(上書きモード)を無効にする

せっかく入力したのに、入力した文字が消えて 新しく入力した文字に置き換えられた。そんな経験はありませんか? これは、[挿入モード]から[上書 ...

円グラフの要素の色を固定する

Excelでグラフを作成すると、1番目の色、2番目の色・・・と決まった色で設定されます。 円グラフの要素の色 たとえば、下のように関東の表で ...

no image
Windows7のエディション

Windows7にも種類があります。 Windows7 Starter(スターター) Windows7 Home Premium(ホームプレ ...

-Windows7 & Office2010 Access2010

Copyright © 2001-2018 初心者のためのOffice講座 All Rights Reserved.

Copyright© 初心者のためのOffice講座 , 2018 AllRights Reserved Powered by AFFINGER4.