こんにちはゲストさん。会員登録(無料)して質問・回答してみよう!

解決済みの質問

Access2000のモジュールで

テーブル1にある処理をした後、そのテーブルを開いて内容を確認し、OKならエクセルにエクセルにエクスポートという処理を記述したいのですが、
  ・
  ・
DoCmd.OpenTable "テーブル1"
If MsgBox("出力してよろしいですか。", vbYesNo, "確認") = vbYes Then
DoCmd.TransferSpreadsheet acExport, , "テーブル1", "C\テーブル1.xls", True

とすると、テーブルを開いてすぐにメッセージボックスが手前に表示されるので、テーブルをスクロールすることができません。
Docmd・・・とif MsgBoxの間にどんな記述を入れれば、できるようになりますか?
それとも、もっとスマートなやり方があるのでしょうか?
教えてください。お願いします。

投稿日時 - 2004-06-16 16:30:23

QNo.894435

困ってます

質問者が選んだベストアンサー

こんにちは。maruru01です。

テーブルを直接開くのではなくて、テーブルに連結したフォームを作成して、そのフォームを開くようにしてはどうでしょうか?
フォームの[既定のビュー]プロパティを、「帳票形式」か「データシート」にすれば、テーブルに近い見た目になると思います。
そして、元のフォームに[確認]などのボタンを用意して、そのクリック時イベントに、

DoCmd.OpenForm "確認用フォーム"

のようにします。
そして、この[確認用フォーム]のフォームヘッダーかフッターに[出力]などのボタンを用意して、このクリック時イベントに出力処理を記述すればいいでしょう。

投稿日時 - 2004-06-16 16:48:19

お礼

なるほど・・・。そういう発想は思いつきませんでした。
一度やってみます。ありがとうございました。

投稿日時 - 2004-06-17 13:26:12

このQ&Aは役に立ちましたか?

0人が「このQ&Aが役に立った」と投票しています

回答(1)

あなたにオススメの質問