Excel VBA質問箱 IV

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

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


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

39193 / 76807

←次へ　｜　前へ→


	【42733】Re:移動の際のエラー回避

Jaka - 06/9/20(水) 11:36 -


	引用なし

	パスワード

>この方法だと「ディスクがいっぱいです」とのｴﾗｰが発生
これはどうしようもないですね。

>この方法だとｺﾋﾟｰは行えるのですがその後の処理で「メモリが足りません」と
>すぐ表示されてしまいました。
セル全体を処理するのでなく範囲を絞ってやったらどうでしょうか？
こんな感じで...。

AD = Sheets(4).UsedRange.Address
ActiveWorkbook.Sheets(4).UsedRange.Copy Workbooks("Book2").Sheets(1).Range(AD)
DoEvents　←貼り付け後に入れておいた方が良いと良いと思います。

0 hits

▼

【42729】移動の際のエラー回避 凪 06/9/20(水) 10:31