MS Access

サブフォームで苦労

投稿日:2007年6月4日 更新日:

Access覚書。

サブフォームつきのフォームからダイアログ・フォームを呼び出す。
ダイアログフォームのリスト形式のレコードをクリックしたら、呼び出し元のフォームのサブフォームに値を追加して、次のための新規レコードも追加する・・・という仕組みを作るのに難航。

以下のようにして解決。

Private Sub Form_Click()
Forms![501業務]![入札].Form.Recordset.AddNew
Forms![501業務]![入札].Form![業者] = ID
End Sub

Recordset.AddNewのところをGoToRecordでやろうとしていたり、
Forms![501業務]![入札].Form![業者].Recordset.AddNew
なんて使い方を間違ったり、
Recordset.MoveNextとかSaveメソッドで何とかならないかとか見当違いをしたり、
していたために苦労した。

-MS Access

執筆者:

関連記事

no image

Accessであらかじめリンクテーブルを開いておくと劇的に高速化

リンクテーブルに対して「Dlookupで値を探して見つかったらCurrentDb.Execute UPDATE~ で値を更新」という処理をループで回している。 この処理、一旦始めると、終えるのに30分 …

no image

VBAで英字混じりの引数から数字のみを取り出す関数

たとえば、abcABC123456XYGという引数から、123456のみを取り出したい。 VBAの組み込み関数で、適当なのがありそうだけど、無いみたい。 カスタム関数を作るにも、これはという情報がググ …

no image

SqlServerにAccessでいうオートナンバー型をつける

テストデータを作るために、Accessで2万件ほどのデータを用意し、別途追加クエリを作って、ODBC接続したSqlServerに追加しようとしたところ、「型変換エラーがどうのこうので追加出来ない」との …

no image

Accessでフォームフィルタの結果をExcelにエクスポートする

ちょっと、苦労した。 Private Sub cmdDMデータ作成_Click() On Error GoTo Err_cmdDMデータ作成_Click Dim rstf As String Dim …

Accessのフォームをデザインしようとすると固まる

タイミングとしては、フォームをデザインビューにした直後、プロパティシートをクリックしたとき。それだけで数十秒待たされる。 原因は、なんとなく、気が付いている。 ついさっき、フォームで使っているクエリに …