• ベストアンサー
※ ChatGPTを利用し、要約された質問です(原文:Access VBAで更新履歴を追いたい)

Access VBAで製品の変更履歴を追跡する方法

このQ&Aのポイント
  • Access VBAを使用して、製品DBから変更履歴DBを作成する方法をご紹介します。
  • 製品F(T)には、ID、製品、製品番号、代品製品番号、変更日があります。製品番号と代品製品番号の履歴を表示するための関数を作成します。
  • 履歴をクリックすると、Fの製品番号(代理製品番号)を使用して過去の履歴を検索します。結果があれば表示し、なければ別のフォームに移動します。

質問者が選んだベストアンサー

  • ベストアンサー
  • tksoft
  • ベストアンサー率36% (99/273)
回答No.1

フローに書いてある通りに作ればよいんじゃないでしょうか? もう少し、具体的にどこが分からないのか書けば解答がつきやすいようにも思いますが、とりあえず。 テーブルを開くのは   Dim DB As Database   Dim RC As Recordset   Set DB = CurrentDb   Set RC = DB.OpenRecordset("テーブル名") 開いたテーブルで検索するのは   RC.FindFirst "検索条件" 検索したレコードが見つかったらNoMatchプロパティがFalseになり、当該レコードがカレントレコードになります。続けて同条件で検索続行するのはFindNext、レコードを最後まで検索すると、EOFプロパティがTrueになります。 とりあえず、こんなところでどうでしょうか?

totis
質問者

お礼

御礼が大変遅くなり申し訳ありません。 どうもありがとうございました。 とても分かりやすく書いていただき助かりました。 といってもまだ試せていないので、 又、またなにかあったらよろしくお願いいたします。

関連するQ&A