Access VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちらをご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

379 / 9994

←次へ　｜　前へ→


	【12928】Re:カレントレコードのサブIDが前のレコードのサブIDと同じなら

まるこ - 16/1/18(月) 13:12 -


	引用なし

	パスワード

かるびの様

回答いただいたのを参考に
下記コードを作ってみましたが、いきなり詰まっています。うまく動きません
おかしいところをご指摘いただけませんでしょうか？

Private Sub ボタン_Click()
Dim db As DAO.Database
Set db = CurrentDb
Dim rs As DAO.Recordset

　DoCmd.OpenQuery "AQ_クエリA"　・・・・クエリAが書き込み不可能の為テーブルAを作成するためのアクションクエリ(テーブルAが作成されます）
　Set rs = db.OpenRecordset(テーブルA)・・・・※エラー箇所　「入力テーブルまたはクエリ"が見つかりませんでした。そのテーブルやクエリが存在していること、または名前が正しいことを確認してください。」と出ます
　
　Do Until rs.EOF
rs.Edit
rs!連番 = rs!連番 - 1

rs.Update
rs.MoveNext
Loop

　　　　rs.Close
　　　　Set rs = Nothing

　　　　db.Close: Set db = Nothing

End Sub

ネットでコードを必死で探して作ってみたのでもしかしたら根本的な事がわかってないかもしれません
よろしくお願いします

512 hits

▼

【12923】カレントレコードのサブIDが前のレコードのサブIDと同じなら まるこ 16/1/15(金) 16:25