クエリ実行後の表から入力フォームを開く方法を教えてください

質問

WindowsXPでアクセス2002を使用しています。

選択クエリを実行し、検索結果一覧が出るようにしています。
その検索結果一覧に新たにフィールドを加え、そのフィールドからリンクなどを使って、そのレコードごとの入力フォーム（既存・同ファイル内）を開く機能を加えたいのです。

そのリンクの入れ方がわかりません。
おしえてください。よろしくおねがいいたします！！

回答No.1

noname#140971 · ベストアンサー

<tab1>

順番___kname
1_______aaa
3_______ccc
4_______bbb
6_______ddd

というテーブルを元に

帳票フォーム<tab1>を作成。
単票フォーム<tab2>を作成。

次に、コマンドボタンを帳票フォーム<tab1>に配置。
ウイザードの案内に従って作業を継続。

Private Sub コマンド4_Click()
On Error GoTo Err_コマンド4_Click

　　Dim stDocName As String
　　Dim stLinkCriteria As String

　　stDocName = "tab2"

　　stLinkCriteria = "[順番]=" & Me![順番]
　　DoCmd.OpenForm stDocName, , , stLinkCriteria

Exit_コマンド4_Click:
　　Exit Sub

Err_コマンド4_Click:
　　MsgBox Err.Description
　　Resume Exit_コマンド4_Click

End Sub

このようなコードが生成されると思います。

Private Sub コマンド4_Click()
On Error Resume Next
　　DoCmd.OpenForm "tab2", , , "[順番]=" & Me![順番]
End Sub

と、簡略化しても構わないと思います。

※リンク機能を使うは、よく判りません・・・。
※Excel1のセルのハイパーリンクもどきを想定されているのでしょうか・・・。

お礼

ばっちりできました！！
どうもありがとうございます！！！