表示されている特定のフィールドレコードと同じものを別のフォームで開いて表示させたい

はじめに

別のフォームに共通のフィールドがあって、ボタンをクリックするとフィールドのデータが一致するレコードをその別のフォームで開いて表示させたいときは、コマンドボタンのウィザードを使うと簡単に作成することができます。

操作方法

1. ボタンを作成します。するとコマンドボタンウィザードが起動します。
2. 種類: フォームの操作　ボタンの動作: フォームを開く を選択して、[次へ]ボタンをクリックします。
   
3. コマンドを使って開くフォームを選択して、[次へ]ボタンをクリックします。
   
4. 「特定のレコードを表示する」を選んで、[次へ]ボタンをクリックします。
   
5. 関連付けるフィールドを指定します。これでこれらのフィールドのデータが一致するレコードが抽出されます。
   そして真中の[<->]をクリックして、[次へ]ボタンをクリックします。
   
6. ボタンに表示する文字列またはピクチャを指定して[次へ]ボタンをクリックします。
   
7. ボタン名を付けてあげて、[完了]ボタンをクリックします。
   
8. フォームビューに切り替えて、都道府県が選択された状態でボタンを押すと・・・
   
9. このように、都道府県と同じデータのフォームが起動しました！
   

なお、コマンドボタンのイベントの「クリック時」には以下のイベントプロシージャが自動作成されました！

Private Sub Prefecture_Open_Click()
On Error GoTo Err_Prefecture_Open_Click

Dim stDocName As String
Dim stLinkCriteria As String

stDocName = "M_Prefecture"

stLinkCriteria = "[都道府県ID]=" & Me![都道府県]
DoCmd.OpenForm stDocName, , , stLinkCriteria

Exit_Prefecture_Open_Click:
Exit Sub

Err_Prefecture_Open_Click:
MsgBox Err.Description
Resume Exit_Prefecture_Open_Click

End Sub

コメント

※技術的な質問はMicrosoftコミュニティで聞いてください！

▲このページのトップへ