Access VBA質問箱 IV

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

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


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

6197 / 9994

←次へ　｜　前へ→


	【7005】Re:エクスポート

たぬき - 05/12/21(水) 18:22 -


	引用なし

	パスワード

▼まのえさん：
>こんにちわ。
>VBA初心者です。
>
>メインフォーム上からサブフォーム（クエリ結果）を「ファイル名を指定して保存」のようなエクスポートがしたいのですが、どなたか知っている方がいましたらお願いします。
>
>'DoCmd.TransferSpreadsheet
>上記の意味もよくわかりません。
>
>宜しくお願い致します。

バージョンがかかれていないのでよくわかりませんが
名前を付けて保存のような「ダイアログ」を使いたい
とのことだと思います。
古いＡＣＣＥＳＳだと残念ながらそれを簡単にできま
せん。
ただ、
１．Excelコンポーネントの利用
２．Windows API の利用
で実現可能です。
１は使用するマシンにExcelがインストールされてい
ることが前提です。
２は多少難しい方法です。

http://www.accessclub.jp/samplefile/samplefile_217.htm
http://homepage1.nifty.com/MADIA/vb/API/GetSaveFileName.htm
などをご覧になってください。

DoCmd.TransferSpreadsheetはExcelのような表計算の形で出力
します。
例えば以下のように書きます。
DoCmd.TransferSpreadsheet acExport, acSpreadsheetTypeExcel9, _
"Q_Excel", savefilename, True
似た命令でDoCmd.TransferTextがありますがこちらはテキスト形式
で出力します。

がんばってください。

345 hits

▼

【7003】エクスポート まのえ 05/12/21(水) 13:58