Page 681 ━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━ 通常モードに戻る ┃ INDEX ┃ ≪前へ │ 次へ≫ ━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━ ▼エクスポートしたい liee_chang 04/3/31(水) 17:54 ┗Re:エクスポートしたい よろずや 04/4/2(金) 0:08 ┗Re:エクスポートしたい liee_chang 04/6/29(火) 13:35 ─────────────────────────────────────── ■題名 : エクスポートしたい ■名前 : liee_chang ■日付 : 04/3/31(水) 17:54 -------------------------------------------------------------------------
いつもありがとうございます。 おわかりになる方、教えていただけますでしょうか??(過去ログ見てもわかりませんでした・・) 現在フォーム上にフィルタで抽出されているデータがあり、 そのデータをエクセルにエクスポートしたいです。 今までは、マクロの出力でエクセル出力していたのですが、どうやら約16500件以上は出力ができないと出てきてしまいます。 これを改善するためにTransferspreadsheetを使おうと思ったのですが どうもテーブルではなくフィルタのフォームなので「オブジェクトがありません」と出てきてしまいました。 何か良い方法がありましたら、アドバイスをください!! お願いしますm(__)m |
> 今までは、マクロの出力でエクセル出力していたのですが、どうやら約16500件以上は > 出力ができないと出てきてしまいます。 仕様です。 > これを改善するためにTransferspreadsheetを使おうと思ったのですが これも同じ仕様です。 代替策は、 Set xlApp = New Excel.Application Set xlBook = xlApp.WorkBooks.Add 見たいな感じのコードを書く必要があります。 |
大変遅くなってしまいましたが 16500件以上だと出力できません、ってMsgBoxを入れることにしました。。 簡単に済ませてしまいました。 よろずやさんに書いていただいた代替策だと まだわたしのレベルでは難な感じでした。 ううむ。要勉強ですね |