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のフォームを開く際、acHiddenとVisibleの組み合わせで高速化

Accessのフォームを開く際、acHiddenとVisibleの組み合わせで高速化 Accessのとあるシステムで、 フォームを開いてフィルタをセットして実行してさらに並べ替える・・・という処理をし …

no image

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

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

no image

Accessでのキーワード検索(フィルタ)とブックマークの関係備忘録

Accessでのキーワード検索(フィルタ)とブックマークの関係を作るのに苦労したのでここに備忘録。 ポイントは、検索ではなくフィルタを使うことと、BookmarkではなくIDをグローバル変数に保存して …

Shopify(Matrixify)でスケジュール化したJobのキャンセル

どうしても方法を見つけられなかったが、ふと画面に目を落とすと、あった、方法が。 焦ると視野が狭くなって、なかなか気が付かないんだよなあ、こういうの。 You have 4 scheduled jobs …

no image

AccessからVBAでブラウザの入力フォームに値をセットする

ExcelWebAddin でWebフォームを自動入力 – Home and Abroad CliborのマクロをPythonの正規表現を使ってフォームに値をセットする – Home and Abro …