VBAのメモ
- ボタンにVBAを割り当てる
- サブフォームを更新する
- フォームの非連結のテキストボックスに入力した値をテーブルに反映させる
- テキストボックスの値を初期化する
- 直前の動作を取り消す
- フォームの指定方法
- 保存ボタン、キャンセルボタン、終了ボタン、更新前確認
ボタンにVBAを割り当てる
デザインビューでボタンを右クリック→イベントのビルド
サブフォームを更新する
Forms("<フォーム名>").Controls("<サブフォーム名>").Form.Requery
フォームの非連結のテキストボックスに入力した値をテーブルに反映させる
Private Sub テーブル更新()
Dim Rst As DAO.Recordset
Set Rst = CurrentDb.OpenRecordset("<テーブル名>", dbOpenTable)
With Rst
.AddNew
.Fields("<フィールド名>") = Me!<テキストボックス名>
.Fields("<フィールド名>") = Me!<テキストボックス名>
.Fields("<フィールド名>") = Me!<テキストボックス名>
.Fields("<フィールド名>") = Me!<テキストボックス名>
.Fields("<フィールド名>") = Me!<テキストボックス名>
.Update
End With
Rst.Close
Set Rst = Nothing
End Sub
テキストボックスの値を初期化する
'初期化 <テキストボックス名>.Value = Null
直前の動作を取り消す
DoCmd.RunCommand acCmdUndo
フォームの指定方法
Forms!フォーム名