
No.1ベストアンサー
- 回答日時:
ご指名ありがとうございますm(_ _)m
えぇ、前回(No.164850)の3番目の方法が良いとの事で・・・・
まず、担当者の変更履歴用のテーブル(担当者履歴)、重要人物の変更履歴用のテーブル(重要人物履歴)を用意します。
テーブルの中身(フィールド)は、担当者情報・重要人物情報のテーブルをコピーして、それに変更日時フィールド(日付/時刻型)を加えたものとし、更新日時フィールドの規定値を「Now()」としてください。
もし、元のテーブルでオートナンバー型を使用している場合は履歴用テーブルでは数値型に変更してください。
次に前回記述したコードの内、strSQL=・・・以降の部分を変更します。
(担当者変更時)
strSQL = "insert into 担当者履歴 select * FROM 担当者情報 " & _
"where 担当者ID = " & Me.担当者ID
(重要人物変更時)
strSQL = "insert into 重要人物履歴 select * FROM 重要人物情報 " & _
"where 重要人物ID = " & Me.重要人物ID
上記の場合、担当者・重要人物の格納してあるテーブルをそれぞれ担当者情報(主キー:担当者ID)、重要人物情報(主キー:重要人物ID)と仮定してあります。適宜変更してください。
また、今回のケースでフィールド数が同一であればUNIONを使用して一つのサブフォームに更新情報を表示することもできますが、同一でない場合やフィールド名の関係もありますので、それぞれを二つのサブフォームに表示してみる方法ではまずいでしょうか(^ ^;
この回答への補足
お返事ありがとうございます。本当にありがとうございます(^o^)丿
言われたように変更しました。すると、担当者履歴テーブルのの主キーを「担当者ID」にしたままだと、「重複なし」になっている為に、最初の1回しか履歴がとれず、2回目からは書き込んでくれませんでした(T_T)そこで、主キーをはずして、「重複あり」にすると、履歴がとれた!(^○^)と思ったら、今度は変更をした分だけ書き込まれてしまいました。(例えば、4箇所訂正したら4レコード同じ履歴が書き込まれる)(T_T)。何か良い方法はありますでしょうか?(@_@)
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
このQ&Aを見た人はこんなQ&Aも見ています
-
ACCESSでデータ変更箇所が分かるようにする方法
Access(アクセス)
-
ACCESSでログを残す方法
その他(Microsoft Office)
-
アクセスのフォームで、文字を中央揃えにしたい
Access(アクセス)
-
-
4
「フォームを作成できませんでした」
Access(アクセス)
-
5
Accessでデータを更新したらその日付を自動入力したい
Access(アクセス)
-
6
Accessでデータシートに同じデータがいくつもでてしまいます。
その他(データベース)
-
7
Accessでフィールド名を変数(文字列)で・・・
Access(アクセス)
-
8
ACCESSのフォームで次のレコードに移動しない方法を教えてください
その他(データベース)
-
9
Access コンボボックスに空のレコードを表示しない方法
Access(アクセス)
-
10
(ACCESS)並び替えをしないでグループ化した
Access(アクセス)
-
11
ACCESSで、履歴事項を管理するクエリを作成したい
Access(アクセス)
-
12
access インポート時、既にあるデータは上書き
Access(アクセス)
-
13
ACCESS フォームからサブフォームのデータを更新・入力したい
Access(アクセス)
-
14
サブフォームの新規レコードに移動したい アクセス
Access(アクセス)
-
15
Access2013で操作ログを残したいです。ご存知の方教えて下さい。
SQL Server
-
16
Accessで埋め込んだサブフォーム(データシート形式)でデータ追加ができない
Access(アクセス)
-
17
テキストボックスにコントロールソースの値、プラス文字を一度に表示させたいのですが、どの様な式を組めば
その他(データベース)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
INT関数のバグ?
-
クエリ上でフィールド名が2つ...
-
アクセスでの、フォームとテー...
-
アクセスクエリで英数字のみ半...
-
アクセスのテーブルでコードを...
-
Access フォームで複数テーブル...
-
Access 別テーブルにある値を抽...
-
ACCESSの時刻の引き算
-
Accessで更新履歴情報を保存(...
-
日付型のフィールドに空白を入...
-
ACCESS 重複データを1...
-
Excleピボットでデータのない部...
-
差込印刷での全角表示について...
-
ファイルメーカーのCase関数で
-
VBA 別シートの同じ日付の欄に...
-
アクセスで追加した項目に全て...
-
アクセスのエラー「クエリには...
-
エクセルデータをワードで差し...
-
アクセス 項目毎にデータを横...
-
年度ごとの最大値
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
アクセス・テーブルの改行につ...
-
ACCESSの時刻の引き算
-
クエリ上でフィールド名が2つ...
-
アクセスでの、フォームとテー...
-
Access ルックアップが反映され...
-
Accessで更新履歴情報を保存(...
-
Access 別テーブルにある値を抽...
-
アクセス: フォーム上で計算...
-
アクセスのテーブルでコードを...
-
Access フォームで複数テーブル...
-
アクセスクエリで英数字のみ半...
-
Access フォーム上でのテキス...
-
ACCESSのリストボックスで複数...
-
ACCESSの複数フィールドの検索
-
アクセスの追加クエリで教えて...
-
INT関数のバグ?
-
アクセスに自動入力を入れたい
-
アクセス:SQLでフィールド...
-
Access 住所入力支援が機能しま...
-
Accessでチェックボックスから...
おすすめ情報