タイトル : Re: 【解決】Re^2: SheetやBookのコピー後の処理 投稿日 : 2009/07/01(Wed) 21:51 投稿者 : 魔界の仮面弁士
>> xlBook.Worksheets(RetShtName).Copy After:=xlDummySheet > ★このコピー方法って結構、ミソな気がします。 > 元のBookのシートを別BookのSheetを指定してコピーするって > 当方にしましたら神業な高等技術です〜〜 この場合、コピー元とコピー先とが、同一の Excel.Application である必要があります。 異なる Application インスタンス間での Copy/Moveはできないので注意してください。 それと、 >> If xlBook.Worksheets(n).Name = TgtShtName Then >> RetShtName = xlBook.Worksheets(n).Name >> Exit For >> End If このコードは If xlBook.Worksheets(n).Name = TgtShtName Then RetShtName = TgtShtName Exit For End If と書くと、プロパティへのアクセス回数を減らせるため、効率が(若干)良くなります。 まぁ、気にするほどの差では無いですけれども。 |