No.7ベストアンサー
- 回答日時:
(2)バッチ処理 については、#6で示したコードと、
以下で完成すると思います。
(1)
追加クエリを作成。以下のSQL文を新規クエリの
SQLビューに貼り付け保存。テーブル1から
テーブル2に追加します。フォームのレコードソース
をテーブル1とします。クエリ名はQ追加としています。
INSERT INTO TdataB
SELECT *
FROM TdataA;
(2)
フォームにコマンドボタンを設置。そのクリックイベントで
以下のように設定します。
Private Sub コマンド0_Click()
Dim rs As Recordset
Set rs = Me.RecordsetClone
If rs.RecordCount = 20 Then
If MsgBox("データを登録します。よろしいですか?", vbYesNo) = vbYes Then
DoCmd.OpenQuery ("Q追加")
End If
Else
MsgBox ("レコードが20件登録されていません")
End If
End Sub
あとは、#4について補足があれば(1)についても完成しますが。
No.6
- 回答日時:
コード(プログラム)の意味が分からないと
大変なのですが、(2)バッチ処理 について
いうと、たとえばフォームを帳票形式で作った
として、レコードが20件に達したとき、
メッセージを出して、20件以上入力できない
ようにするには、フォームのレコード移動時
のイベントで以下のように設定します。
Private Sub Form_Current()
If Me.CurrentRecord > 20 Then
MsgBox ("レコードが20件になりました。登録してください。")
End If
End Sub
これで新規レコードに移動するとメッセージが出て
入力できません。これがコードですが。
No.5
- 回答日時:
テキストボックス2つなら更新後処理にチェック処理記述か、
ボタン用意してクリック時にチェック処理を書くではどうですか。
やりたいのは認証形式でしょうか?。2つ目入力の際1つ目入力値をパスワードのように見せない工夫等要るのでは?。また、1つ目はシステム内に固定値として埋め込むとかすると使う側1つだけで良い、2つ入力のやりたいことがイマイチわからないので何とも言えませんが。
No.4
- 回答日時:
>1回目の入力とは別人が2度目を入力するようにすることは
>可能でしょうか?
これは別のPCから入力するということですか?
そうであれば、サーバーにあるファイルに対し
てですか。
あるいは、LANで結ばれているPC同士
が一つのPC上のファイルに対して別々に入力
するということですか。
あるいは、一台のPCで二人の
人物が別々に入力するということですか。
>コード
コードとはプログラム(VBA)のことです。
No.2
- 回答日時:
イメージでは
保存したいテーブルと同じ構造のワークテーブルを作ります。
入力した20件のデータはワークテーブルに格納します。
フォームではボタン2つ用意します。1つ目チェックボタン押下でDLOOKUPによる存在チェックをし、OKなら2つ目登録ボタンで実際に書き込むようにする。2段階にできます。
書き込むというのは前述のワークテーブルから本来のテーブルへ追加することです。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Access(アクセス) Access 登録ボタンからサブフォームの更新 1 2022/07/22 10:23
- Excel(エクセル) Excel VBAについてです。 少しだけ知識はあるのですが、 うまくいかなかったので 質問させてい 3 2022/09/13 18:40
- SQL Server DBのテーブルの設計ができず困っています。 2 2023/06/29 16:43
- Visual Basic(VBA) VBA 登録ボタンを省略してエンターキーで作業 4 2022/07/09 22:29
- Windows 10 Google日本語入力について 3 2022/10/20 15:51
- Access(アクセス) Dlookupにエラーがでてしまう 1 2022/10/31 14:35
- 電子マネー・電子決済 Visa LINE Pay P+を作りました。 カードレスで、すぐに作れました。 vpassに登録し 1 2023/08/19 23:12
- Google Drive Googleカレンダーの新規予定登録のカレンダー変更方法 2 2022/06/11 19:16
- JavaScript ラジオボタンによるフォームの開閉を行いたい 3 2022/03/31 21:30
- Visual Basic(VBA) Excel VBA 同じ名前のフォルダがあれば作成したブックを格納するマクロをつくりたい 2 2023/01/16 16:19
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
3つ以上のテーブルをUNIONする...
-
Access VBA Me.Requery レコー...
-
ManagementStudioからのデータ削除
-
Access 1レコードずつcsvで出力...
-
SQLServerで同一条件レコードの...
-
データの二重表示の原因
-
2つの項目が重複するレコード...
-
Accessにインポートしたら並び...
-
数百万件レコードのdelete
-
Access2000でのExcel行の削除法
-
Access 削除クエリが重い
-
Accessでの禁止文字チェック
-
Access カレントレコードがあり...
-
テーブルのレコード削除ができ...
-
Accessの重複クエリで最小以外...
-
SQLデータ修正時に『このレコー...
-
Accessでの排他制御
-
ACCESSファイルを開こうとする...
-
Accessでの自己結合?
-
Access2000のODBCで困っています
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
3つ以上のテーブルをUNIONする...
-
2つの項目が重複するレコード...
-
数百万件レコードのdelete
-
Accessにインポートしたら並び...
-
データの二重表示の原因
-
Access VBA Me.Requery レコー...
-
ACCESSのBookmarkプロパティの...
-
Access 1レコードずつcsvで出力...
-
Access 削除クエリが重い
-
ManagementStudioからのデータ削除
-
SQLServerで同一条件レコードの...
-
非連結サブフォームのレコード...
-
Accessでレコードが更新された...
-
Accessでの排他制御
-
(ACCESS)並び替えをしないで...
-
Accessで重複したデータを一件...
-
Accessでの禁止文字チェック
-
Access カレントレコードがあり...
-
ACCESSファイルを開こうとする...
-
ACCESS【更新クエリの中断がで...
おすすめ情報