No.1ベストアンサー
- 回答日時:
こんにちは。
一覧表フォームで左クリックでのその行のある項目値をある変数に取りたいということでいいでしょうか。
フォーム編集と表編集切り替えて確認してみてください。左クリックでレコード位置はその行に移動しています。ということは、[氏名]を &STRに取りたいのなら、[氏名]をソースにしているオブジェクトが t氏名だとして、t氏名のオブジェクト属性のイベントタブ マウス左クリックにチェックいれて、KEVに
手続き定義開始 t氏名::マウス左クリック(長整数 &マウス位置[2],長整数 &明細番号,長整数 &フラグ,参照 長整数 &処理中止)
代入 &STR=[氏名]
手続き定義終了
これだけでいいのです。(マウス・クリックは全角表記にしています。)
ただ、これでは t氏名以外のオブジェクトをクリックしても反応してくれません。それには、一覧表オブジェクトのその行の全オブジェクトに同様に設定すればよいのですが、「ファミリ」を使えば、もうちょっとスマートに処理できます。
書式→ファミリパレット 新規作成を2回クリックすれば「ファミリ_1」ができます。
書式→オブジェクトリスト→ファミリ→ファミリ_1 右クリックして両方を選びます。イベントのタブでマウス左クリックにチェック。点3つ並んだビルダボタンをクリック。KEV名はフォーム名と同じにします。KEVの記述は次。
手続き定義開始 ファミリ_1::マウス左クリック(長整数 &マウス位置[2],長整数 &明細番号,長整数 &フラグ,参照 長整数 &処理中止)
代入 &STR=[氏名]
手続き定義終了
あとは各オブジェクトへの設定。1レコードあたり1行とします。フォーム定義で行の一番左のオブジェクトクリック、Shift押しながら一番右のオブジェクトクリック。これでその行の全オブジェクト選択できているはずなので、書式→オブジェクトの属性→イベントのタブ。右下のファミリ名のところでファミリ_1選択。
これで、その行のどの項目を左クリックしても、&STRに[氏名]を代入するイベントが発生することになります。試してみてください。
(書式→定義画面の設定で「詳細プロパティを使用する」にチェックをお忘れなく。操作ナビも消去したほうがいいでしょう。)
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- JavaScript javaScriptで画面に値を入れるには 1 2022/08/14 12:27
- その他(IT・Webサービス) [PayPay銀行キャッシュカード拾得の件] このメールは本物か? 6 2022/09/15 21:52
- Excel(エクセル) 余計なお世話的な「入力規則」?対策は? 2 2023/01/14 12:39
- Excel(エクセル) スプレッドシートのハイパーリンクについて 2 2023/03/22 00:47
- その他(ホビー) 中古グッズの買取について質問です。 時間がある方お願いします。 先日、友人から缶バッジやキーホルダー 3 2022/07/29 17:28
- その他(セキュリティ) Yahoo! JAPANのID取得について 1 2022/11/30 23:00
- PHP 配列の値の更新方法について 1 2022/08/05 09:49
- IT・エンジニアリング ★お手上げ状態です。助けてください。ActiveReportについて 1 2023/08/20 04:29
- Visual Basic(VBA) ★お手上げ状態です。助けてください。ActiveReportについて 1 2023/08/20 04:27
- オープンソース Python openpyxlを使用したセル番地の使用について 1 2023/08/03 22:05
関連するカテゴリからQ&Aを探す
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
VBA エンターキーでイベントに...
-
アクセスVBAのMe!と[ ]
-
日本語の文字化けを直す方法
-
Excel2007 でのチェックボック...
-
Accessのフォーム上にエクセル...
-
Excel VBAでマウスの左クリック...
-
現在アクティブになっているオ...
-
エクセルのデータをwebフォーム...
-
Access からオブジェクトとして...
-
文字列で小数点以下の0を削除し...
-
Bitmap.GetPixelより高速なもの
-
txtNo,txtDate等の意味
-
PowerpointVBAで指定のShapeオ...
-
コードでオブジェクトを最前面に
-
構造体の静的な初期化
-
GDIオブジェクトが増える……
-
【エクセルのマクロ】クリップ...
-
アクセスで説明の欄の隠しオブ...
-
エクセルVBAでセル番地を指定し...
-
アクセス 名前のつけ方について。
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
アクセスVBAのMe!と[ ]
-
VBA エンターキーでイベントに...
-
Excel VBAでマウスの左クリック...
-
文字列で小数点以下の0を削除し...
-
【エクセルのマクロ】クリップ...
-
エクセルVBAでセル番地を指定し...
-
Excel2007 でのチェックボック...
-
Accessのフォーム上にエクセル...
-
日本語の文字化けを直す方法
-
エクセルのデータをwebフォーム...
-
現在アクティブになっているオ...
-
PowerpointVBAで指定のShapeオ...
-
コードでオブジェクトを最前面に
-
【エクセル】複数のTextBoxに共...
-
Imageコントロールにグラフを表...
-
ユーザーフォームのインポート...
-
Access からオブジェクトとして...
-
構造体の静的な初期化
-
Excel VBA でPictureBoxオブジ...
-
「SHDocVw」の意味
おすすめ情報