Excel2000で全てのセルを別のシートにコピー
OS:WinXP-Home
Office:Excel2000
を使用して、VBAの入力フォームを作成しています
複数のTextboxとComboboxを使い、結果をエクセルシート上に反映させるだけのものです
入力したものを間違って消したり変更させたくないので
入力結果のエクセルシート(Sheet1)を保護して
リアルタイムで別のシート(Sheet2)に全く同じ物を編集用にコピーして
オートフィルタやその他の機能を使いたいと思っています
そこで、Sheet2のA1セルに
=if(Sheet1!A1<>"",Sheet1!A1,"")
と言う式を入力して、A~Z列の全てのセルにコピーしたところ
「メモリ不足です」
と言うエラーが出て進みません
一度に全ての行をコピーしたからかと思い、少しずつコピーしたのですが
ある程度の回数をコピーするとやはり「メモリ不足です」と出てしまうので
結論からこのやり方は不可能だと思いますが
=Sheet1!A1
とすると、全部のセルに問題なくコピーできます
ですが、その場合、空白セルのコピー結果が「0」に表示されるので不都合です
メモリをあまり消費しないif式の書き方や
別の関数での対処方法
0の時は表示しない方法
などの何か良い対処方法があれば教えてください
やりたいのは
Sheet1の全データをリアルタイムにSheet2に映す、と言う事です
よろしくお願いします
お礼
ありがとうございます。 最初からチェックが入っていました。 VisualBasicが入っていないとか関係ないですかね?