質問: access2000のテーブルデータをexcelの指定したsheetのcellに貼り付けたい! 仕事で困っています!教えて下さい。 accsess2000の指定したテーブルデータをexcel2000の指定したbookのsheetのcell位置に貼り付けたいのですがvbaでロジックを組む方法がわかりません。 ぜひぜひ教えて下さい。お願いします。
回答: excelでaccessのデータを使うときは、[データ]-[外部データの取り込み]を使うと簡単ですよね。 加えて、「外部データ範囲のプロパティ」で、「ファイルを開くときにデータを更新する」にチェックをつけておくと、いつでも新鮮なデータを得ることができるんですが、こういうやり方では ninaさんのご意向に添えませんか? 私も仕事で時々accessとexcelを連携させる必要が生じるのですが、よほどのことが無い限り、上記のようなやり方をとっています。 よほどのことがある場合(excel上でパラメータを指定しなくてはならない場合など)は、適当なデータベースオブジェクト(daoがいいかも)を使います。 '参照設定で「dao」を登録している必要あり dim db as dao.database dim rst as dao.recordset set db = workspaces(0).opendatabase("xxx.mdb") set rst = db.openrecordset("select * from tablename;") do until rst.eof '適当にセルに代入 rst.movenext loop こんな感じですか。 querytableオブジェクトのrecordsetプロパティとかをうまく使えば、do~loop の部分は省略できるかも。 分からない部分があれば、補足にてご質問ください。