私はいくつかのデータを含むワークブックを持っています。これをフィルタリングし、フィルタリングしたデータを新しいブックに保存します。関数は次のようになります。コードの最適化から1300のブックを作成する最速(そして最も安全な)方法は?
別にSub bleh()
For Each i In Number
~~ filter, copy, paste, save ~~
Next i
End Sub
、それは現在のワークブックとカット全体で各ワークシートを保存し、各反復
- にありますブック 最後に個別のワークブックに?
ありがとうございます。
保存する前に1300枚のワークシートを作成するのは安全ではありません。また、変数をガベージコレクションできるように、個々の操作を別のサブにファーム化します。例えば。 Sub Loop()i = 1〜1300の場合Call DoSave(ワークブックi)Next i End Sub – Absinthe
引用:* ...最後に別のワークブックに全体のブックをカットする* *同じように* ...新しいワークブックとして各ワークシートを保存する... *間にセーブしないで...ちょうどあなたはすでにあなた自身の質問に答えていました;) –
しかし、シートを使って作業するよりも速くそれを実行するには、変数内の値をプッシュします - 結果を1つの長い文字列として計算する - >テキストファイルに書き込む(csvとして保存する) ) –