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で質問しましょう!
似たような質問が見つかりました
- Access(アクセス) Access 登録ボタンからサブフォームの更新 1 2022/07/22 10:23
- Visual Basic(VBA) Excelのマクロについて教えてください。 作業フォルダ内に2つのファイルがあります。 このファイル 2 2023/07/09 13:40
- Visual Basic(VBA) エクセルについて教えてください。 3 2023/06/28 09:11
- Access(アクセス) ACSESS初心者です マンション管理をACCESSで出来ないかとチャレンジしています。 リレーショ 3 2022/10/08 11:45
- Excel(エクセル) エクセルのマクロについて教えてください。 2 2023/02/21 13:29
- その他(パソコン・周辺機器) 同じファイル名 上書きしないフリーソフトなどあったら教えて下さい。 仕事で大量の写真などを扱っており 3 2023/05/18 06:43
- Access(アクセス) ExcelのVBAコードについて教えてください。 4 2023/01/20 09:44
- サーバー WIN10のファイル又はフォルダを社内LAN上HDDで共有する場合、特定の人だけが見えるようにしたい 3 2023/04/18 00:32
- 労働相談 合意済み仕様の商品納入後における仕様変更要求への対応について 5 2023/04/19 09:41
- その他(Microsoft Office) ワードのマクロについて教えてください。 1 2023/01/21 16:01
このQ&Aを見た人はこんなQ&Aも見ています
-
新NISA制度は今までと何が変わる?非課税枠の拡大や投資対象の変更などを解説!
少額から投資を行う人のための非課税制度であるNISAが、2024年に改正される。おすすめの銘柄や投資額の目安について教えてもらった。
-
ACCESSでログを残す方法
その他(Microsoft Office)
-
ACCESSでデータ変更箇所が分かるようにする方法
Access(アクセス)
-
ACCESSで、履歴事項を管理するクエリを作成したい
Access(アクセス)
-
-
4
Accessでデータを更新したらその日付を自動入力したい
Access(アクセス)
-
5
Access フォームのテキストボックスに半角英字のみで入力する設定は
Access(アクセス)
-
6
Accessで別テーブルの値をフォームに表示したい
その他(データベース)
-
7
アクセスのエラー「クエリには出力フィールドが1つ以上必要です。」
その他(Microsoft Office)
-
8
レコードを保存するコード アクセスvba
その他(Microsoft Office)
-
9
アクセスVBAで既に開いているエクセルを閉じたい
Yahoo!ショッピング
-
10
Access レポート印刷するときに1ページに収める方法
Access(アクセス)
-
11
Accessのマクロでモジュールを実行させたい。
Access(アクセス)
-
12
アクセスでテキストボックスの値が空白だったら
Access(アクセス)
-
13
access2000:フォームで入力した内容を新規レコードにコピー
その他(データベース)
-
14
前のレコードの値を自動で入れたい
PowerPoint(パワーポイント)
-
15
MS Accessでフォームの「開く時」と「読込み時」のイベントの違い
Access(アクセス)
-
16
Access サブフォームでの選択行の取得
その他(データベース)
-
17
アクセスで#エラーを表示させない方法は?
Access(アクセス)
-
18
Access2003 クエリで、空の列は作れますか?
Access(アクセス)
-
19
アクセス: フォーム上で計算した数字をテーブルに保存したい。
Access(アクセス)
-
20
ACCESSのフォームからデータの追加ができない
その他(データベース)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
アクセス・テーブルの改行につ...
-
クエリ上でフィールド名が2つ...
-
ACCESSの時刻の引き算
-
Access 別テーブルにある値を抽...
-
ACCESSのリストボックスで複数...
-
アクセスの追加クエリで教えて...
-
アクセスでテーブル入力用のフ...
-
テーブルとクエリの相関図は表...
-
アクセスでの、フォームとテー...
-
Access フォーム上でのテキス...
-
Accessでチェックボックスから...
-
アクセス:SQLでフィールド...
-
access テーブルの色分けについて
-
アクセスクエリで英数字のみ半...
-
Accessで更新履歴情報を保存(...
-
アクセス: フォーム上で計算...
-
Accessで1つのフィールドに複...
-
差込印刷での全角表示について...
-
日付型のフィールドに空白を入...
-
アクセスのエラー「クエリには...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
アクセス・テーブルの改行につ...
-
アクセス: フォーム上で計算...
-
クエリ上でフィールド名が2つ...
-
Accessで更新履歴情報を保存(...
-
アクセスでの、フォームとテー...
-
ACCESSの時刻の引き算
-
Access 別テーブルにある値を抽...
-
テーブルとクエリの相関図は表...
-
INT関数のバグ?
-
Access フォーム上でのテキス...
-
アクセスクエリで英数字のみ半...
-
アクセス:SQLでフィールド...
-
アクセスの追加クエリで教えて...
-
アクセスに自動入力を入れたい
-
ACCESSのリストボックスで複数...
-
access テーブルの色分けについて
-
Access2013 クエリ内別フィール...
-
アクセスでテーブル入力用のフ...
-
Access 住所入力支援が機能しま...
-
Access フォームで複数テーブル...
おすすめ情報