アクセスＶＢＡ 変数を渡したい

質問

フォーム１のcmd_ボタンをクリックして、フォーム2を開く際に、変数を渡したいのですが、どう渡せばいいのでしょうか？

Private Sub cmd_ボタン_Click()

myStr = "あああ"

DoCmd.OpenForm "フォーム2" (myStr)

End Sub

とすると、エラーになります。

文の書き方を教えてください。

回答No.1

noname#208392

DoCmdオブジェクトのOpenFromメソッドの引数はこんな風になっています。
DoCmd.OpenForm FormName, View, FilterName, WhereCondition, DataMode, WindowMode, OpenArgs
このうちで最後のOpenArgsが開く対象のフォームに渡すデータです。

開いたフォームの側では、
Me.OpenArgs
にこのデータが入っています。

この↓ウェブページに具体例が載っていますから、ご覧になられると良いでしょう。
http://www.happy2-island.com/access/gogo03/capter40203.shtml

あるいは、VBAエディタの画面でカーソルをOpenFromにあててF1を押せば、このメソッドの説明を読むことができます。