フォーム、VBAExcelには「コメント」という機能があります。これは、セルごとに自由にメモ書きなどを付けられる機能です。Accessにはそのような機能はありませんが、テーブル構造やフォームのプログラムを工夫することで、似たような感じの機能を付加することはできます。ここでは「仕入先」というテーブルを例に説明します。テーブルにおいて、本来の仕入先の情報に加えて、各データのコメントを保存するためのフィールドを追加します(例ですのでここでは3つだけとします)。そのテーブルをレコードソースとするフォームを作成します。ここでは本来コメントに関するフィールドはコントロールとして配置しない方がルックスはよいと思いますが、動作確認のためあえて配置しておくこととします。次に、コメントを付ける3つのコントロールについて、その編集画面を開くためのプログラムを追加します。そのタイミングは任意です。クリックや右クリックで表示させるようにしてもよいですが、ここでは”ダブルクリック”で表示させるものとして「DblClick/ダブルクリック時」イベントプロシージャを使います。ここでは、編集用のフォームからコメントデータを参照・代入するため、それぞれ該当するコメントのフィールド名を引数として与えています("会社名コメント"や"フリガナコメント"の部分)。下記がそのコードです。Sub次に、コメントを表示・編集するためのフォームを作成します。上記の呼び出し元フォームと同じテーブルをソースとして操作する方法もありますが、ここではレコードソース”なし”の非連結フォームとし、単にコメント編集用のテキストボックスを1つと、編集結果を確定/キャンセルするためのボタンを配置するだけのスタイルとします。※任意ではありますが、ここではフォームについて下記のプロパティ設定を行っています。その他、適宜設定を行ってください。自動中央寄せ:はい、境界線スタイル:なし、レコードセレクタ:いいえ、移動ボタン:いいえ、スクロールバー:なし、コントロールボックス:いいえ、ポップアップ:はい、作業ウィンドウ固定:はいフォーム読み込み時に引数(OpenArgs)で指定されたコントロールの値を参照しその内容をこのフォームのテキストボックスに代入するコード、および[OK]・[キャンセル]ボタンがクリックされたときのコードを次のように記述します。|この情報は参考になりましたか?、問題は解決しましたか?、もしまだなら......T'sWareのワンポイトテクニカルアドバイスをご利用ください。3000円/件〜でご支援します。