Access VBA質問箱 IV

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

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


7376 / 9994 ←次へ | 前へ→

【5812】Re:マクロでのクエリ実行
質問  おはな  - 05/8/10(水) 14:11 -

引用なし
パスワード
   Gin_II さん、小僧さん:

ありがとうございます(>_<)
やはりマクロよりはクエリ名を変更した方が後々、
クエリが増えても楽かと思いまして、そうする事にしました!

で、またまた質問なんですが…

1_名称変更1、1_名称変更2、1_名称変更3
2_名称変更1、2_名称変更2、2_名称変更3、2_名称変更4

とクエリがあって、分かりずらい文ですが作ってみました。

Q_Name="_名称変更"
Q_No1=1
Q_No2=1

Do Until Q_No1 = 3
  If Q_No1 & Q_Name & Q_No2 Then   'クエリがあったら以下の処理
    Do Until Q_No2 = ●       ’最終テーブルのNoを出したい!!
      DoCmd.OpenQuery Q_No1 & Q_Name & Q_No2, acNormal, acEdit
     Q_No2 = Q_No2 + 1
    Loop
  end If
  Q_No1 = Q_No1+1           '2_名称変更1のクエリ準備
  Q_No2 = 1
Loop

DO Until…LOOPでする時、最大値(ここでいう4)設定するには
どうしたら良いんでしょうか?

267 hits

【5805】マクロでのクエリ実行 おはな 05/8/10(水) 10:46 質問
【5807】Re:マクロでのクエリ実行 Gin_II 05/8/10(水) 11:34 回答
【5808】Re:マクロでのクエリ実行 小僧 05/8/10(水) 11:45 発言
【5812】Re:マクロでのクエリ実行 おはな 05/8/10(水) 14:11 質問
【5813】Re:マクロでのクエリ実行 Gin_II 05/8/10(水) 14:33 回答
【5818】Re:マクロでのクエリ実行 おはな 05/8/10(水) 15:37 お礼

7376 / 9994 ←次へ | 前へ→
ページ:  ┃  記事番号:
1078260
(SS)C-BOARD v3.8 is Free