ACCESS初心者です。
ACCESSのテーブルからクエリで、抽出したデータを個々に作成したテキストボックスに
貼り付けるには、どうしたらよいのでしょうか。
現在の考えだと、みな同じデータ(先頭のデータ)のみしか表示されない状態です。
実施した事
1.クエリの作成
ACCESSで、クエリ機能を使用してデータを抽出しました。
抽出条件は、
建屋番号が#10で、フロアが1階のみです。
クエリ名:Q_10_1F
ID 建屋 フロア 表示番号 名称 IPアドレス
1 #10 1 0001 #10-1F-PW1 192.168.86.XXX
2 #10 1 0002 #10-1F-PW2 192.168.86.XX
3 #10 1 0003 #10-1F-PW3 192.168.86.XX
2.フォームの作成
抽出したデータをもとに、フォーム上にイメージ図(フロアマップ)を置き、
その上にテキストボックスを3つ設けて、そこに、名称をテキストボックス
に表示したい。
テキスト1のボックス(非連結部分)に -->#10-1F-PW1を表示
テキスト3のボックス(非連結部分)に -->#10-1F-PW2を表示
テキスト5のボックス(非連結部分)に -->#10-1F-PW3を表示
3.フォームの”読込み時”に、以下のイベントプロシジャーを作成
Option Compare Database
Private Sub Form_Load()
'--- 名称エリア--------------
Dim m_name1 As Variant
Dim m_name2 As Variant
Dim m_name3 As Variant
'---クエリOPEN
DoCmd.OpenQuery "Q_10_1F", acViewNormal, acEdit
'--- レコード最初
DoCmd.GoToRecord acQuery, "Q_10_1F", acFirst
'--- 名前のフィールドのデータを取得
m_name1 = Me.名称
'--- 次レコード
DoCmd.GoToRecord acQuery, "Q_10_1F", acNext
m_name2 = Me.名称
'--- 次レコード
DoCmd.GoToRecord acQuery, "Q_10_1F", acNext
m_name3 = Me.名称
End Sub
結果的に、 m_name1 、 m_name2、 m_name3はすべて#10-1F-PW1のデータが
設定されておりました。
考え方が根本的に間違っておりましたらすみません、
ご教示の程、宜しくお願い致します。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Access(アクセス) Accessのクエリの結果を、既存のエクセルに追加したい 2 2022/07/31 22:44
- その他(データベース) 更新クエリをリンクデータベーステーブルに実行し実行時エラー3362固有インデックスに重複する値が含ま 1 2022/09/21 11:44
- その他(Microsoft Office) マクロVBAについて 1 2022/09/06 18:12
- Visual Basic(VBA) ユーザーフォーム「frm_基本❶」を立ち上げると新規で入力する行数を右下のNoとして表示しています。 1 2023/03/16 19:02
- Visual Basic(VBA) 【前回の続きです、ご教示ください】VBAの記述方法がわかりません。 2 2022/08/16 16:44
- Visual Basic(VBA) access count数を変数に格納 2 2022/03/30 19:21
- Visual Basic(VBA) 【ご教示ください】VBAの記述方法がわかりません。 2 2022/08/12 21:28
- Visual Basic(VBA) VBA Userformで一部別シートに転記がしたいのですが 2 2023/05/24 13:08
- Excel(エクセル) 【困っています】VBA 追加処理の記述を教えてください。 1 2022/08/25 22:54
- その他(データベース) Accessフォームからパラメーターで表示したレコードを指定のExcelのセルへ転送する方法について 2 2022/08/22 18:04
このQ&Aを見た人はこんなQ&Aも見ています
-
新NISA制度は今までと何が変わる?非課税枠の拡大や投資対象の変更などを解説!
少額から投資を行う人のための非課税制度であるNISAが、2024年に改正される。おすすめの銘柄や投資額の目安について教えてもらった。
-
テキストボックスにクエリ結果を表示させたい
その他(データベース)
-
Access2013。テキストボックスにクエリの値を表示したい。 ①テーブル「受注情報」 フィールド
Access(アクセス)
-
Accessでテーブルの値をテキストボックスに代入するには?
Access(アクセス)
-
-
4
Accessのマクロでモジュールを実行させたい。
Access(アクセス)
-
5
アクセスでテキストボックスの値が空白だったら
Access(アクセス)
-
6
VBAをつかってクエリの情報を抽出するには??
Visual Basic(VBA)
-
7
Accessで別テーブルの値をフォームに表示したい
その他(データベース)
-
8
アクセスで#エラーを表示させない方法は?
Access(アクセス)
-
9
ACCESS2010のVBAでフォーム内クエリのフィールド値を取得したい
Visual Basic(VBA)
-
10
ACCESSでVBAから選択クエリの抽出条件を指定したい
Access(アクセス)
-
11
2つ目のレコードの値を取得するには?
Access(アクセス)
-
12
Access 複数フォームを開き、画面の最上面にしたいフォームをコント
その他(データベース)
-
13
Accessで、フォームからフォームへ値を引き継ぐやり方
Access(アクセス)
-
14
アクセスのフォームで、文字を中央揃えにしたい
Access(アクセス)
-
15
Access 別フォームへの再クエリ(更新)がしたい。
その他(データベース)
-
16
[至急]accessクエリ結果を入力フォームに出力
その他(Microsoft Office)
-
17
ACCESSで空白のデーターをクエリで判定/識別する方法を教えてくださ
Access(アクセス)
-
18
Accessでデータシートに同じデータがいくつもでてしまいます。
その他(データベース)
-
19
Msgboxにテーブルのレコードを表示させたい。
Access(アクセス)
-
20
ACCESS2003 でクエリの抽出条件に変数を代入したい。
その他(データベース)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
Access データのないフォーム...
-
レコードを保存するコード ア...
-
ACCESS起動時に所定フォームを...
-
アクセスの自動保存解除はでき...
-
Access 帳票フォームでカレント...
-
レコード削除時に(サブ)フォー...
-
Accessで上の行を自動でコピー...
-
Accessのサブフォームで、次の...
-
Accessでフォーム上に 直前の...
-
アクセス フォーム テーブルを...
-
AccessVBA RecordSourceのリセ...
-
アクセスでの警告について教え...
-
ACCESS「ンボ ボックスで選択し...
-
アクセスのフォームで立ち上げ...
-
フィルタ後のフォームの件数の...
-
アクセス2000で在庫管理ファイ...
-
ACCESSでフォームを使って、テ...
-
Access レポート印刷するときに...
-
YahooのIDがロックされてしまい...
-
エクセルVBA オプションボタ...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
レコードを保存するコード ア...
-
アクセスでフォームビューがみ...
-
ACCESSでフォームを使って、テ...
-
新規レコード行を非表示にしたい
-
フィルタ後のフォームの件数の...
-
Accessでレコードの保存をせず...
-
Accessでフォーム上に 直前の...
-
Accessで上の行を自動でコピー...
-
AccessVBA RecordSourceのリセ...
-
レコード削除時に(サブ)フォー...
-
アクセスの自動保存解除はでき...
-
Accessで新しいレコードに規定...
-
ACCESS起動時に所定フォームを...
-
Access 「このレコードを保存す...
-
Access:フォームプロパティ「...
-
Access2010、値を入力したら自...
-
レコードをダブルクリックする...
-
アクセス データの競合を非表...
-
ACCESSのクエリで抽出したデー...
-
Accessでのデータ消滅に...
おすすめ情報