| |
"フォームA"がありその中に"サブフォームa"、他に
"フォームB"があり、そこに"テキストボックスA"の内容をコマンドボタンを
クリックするたびに
"サブフォームa"の新しいレコードにテキストボックスBにAの内容を入力したいのですが、
いろいろ参考にして書いたがヤッパリマネではダメでした!
VBAはほぼ初心者な者で。
アドバイスよろしくお願いします。
-------------------------------------------
DoCmd.SelectObject acForm, "フォームA"
DoCmd.GoToControl "サブフォームa"
DoCmd.GoToRecord , , acNewRec
With Me![ォームA].Form
![サブフォームa]![テキストボックスB] = Me![テキストボックスA]
End With
DoCmd.GoToRecord , , acNewRec
Forms![フォームA]![サブフォームa].Requery
-------------------------------------------
|
|