質問: よろしくお願いいたします。 アクセスで作ったクエリを、エクセルに出力したいです。 ボタンをフォームに作り**、クリックイベント時にクエリの内容がエクセルに一覧表示されるようにしたいのですが、** 下記のコードを実行しても、エクセルには何も出力されません。 下記のコード訂正もしくは他の案、やり方など有職者の皆様にお教えいただきたく存じます。 ``` Private Sub コマンド7_Click() DoCmd.TransferSpreadsheet acExport, 8, "Q商品別売上一覧表", "C:\Users\xxx\Desktop\新しいフォルダー.xlsx", True, "" End Sub ```
回答: 当方、Access2010の環境ですが、 ``` DoCmd.TransferSpreadsheet acExport, 8, "M_TEST クエリ", "C:\Work\新しいフォルダー.xls", True, "" ``` でクエリの全内容が出力されました。 いまいちど ・クエリ自体は正しくデータ取得できているか? ⇒クエリを開いてデータが取得できているか確認 ・出力フォルダーへのアクセス権はあるか? ⇒エクスプローラ等で出力フォルダを表示し、テキストファイルなどを作成してみる ・そもそもTransferSpreadsheetは実行されているか? ⇒TransferSpreadsheetの実行行にブレイクポイントを設定し、ボタンを押してみる をご確認ください。 ちなみに引数の[8]はMicrosoft Excel 97 形式のため、拡張子「.xlsx」でもファイル出力はされますが「ファイルが壊れている」と言われ開けません。 上記ファイルも拡張子「.xls」に変更することでファイルを開くことができ、内容は正しく出力されていると思います。 ご参考までに。