Excel VBA質問スレ Part13at TECHExcel VBA質問スレ Part13 - 暇つぶし2ch■コピペモード□スレを通常表示□オプションモード□このｽﾚｯﾄﾞのURL■項目テキスト213:188 09/10/10 10:16:15 >>196 テストしてみたところ問題なく動きました。 本当にありがとうございます。 214:デフォルトの名無しさん 09/10/10 10:51:27 >>210 羮に懲りて膾を吹く。 アプリ終了前にfreeしまくるがごとし。 215:デフォルトの名無しさん 09/10/10 12:23:40 >>197 >>196を擁護すればSetした方が速いんだよ。 まぁCellsは遅いから、速くしたければ配列だろうけどね。 それからわざわざシート参照の変数をSet 変数 = Nothingとする必要はねーよ。 そんなこと気にするやつは、他にもっと気にすべきことが抜けてる場合がほとんどだ。 216:デフォルトの名無しさん 09/10/10 12:55:55 >>196の >S2.Cells(R_dest, 1) = .Cells(r, c) >S2.Cells(R_dest, 2) = .Cells(r, c + 1) >S2.Cells(R_dest, 3) = .Cells(r, c + 2) この部分は S2.Cells(R_dest, 1).Resize(,3).Value= .Cells(r, c).Resize(,3).Value と1行で書けそうだな。 217:デフォルトの名無しさん 09/10/10 13:10:30 オブジェクトがデカいと メモリが少ないようなマシンで set=nothingしないとその後辛くないかな 何もないなら必要ないだろうけど。 試して言っている訳ではないです。 次ページ最新レス表示レスジャンプ類似スレ一覧スレッドの検索話題のニュースおまかせリストオプションしおりを挟むスレッドに書込スレッドの一覧暇つぶし2ch