セルに、見えない"何か"が入って困っています
EXCEL VBA(VB6.0)の質問です。結構長いプログラムなので、どの辺りに原因があるのか自分でもよくわからないのですが、シートの内容(値)を入れた2次元配列(myCELLSARRAY)の内容をそのまま実際のセルへ書き込む下記のステートメントがあります。
For i = LBound(myCELLSARRAY, 1) To UBound(myCELLSARRAY, 1)
For j = LBound(myCELLSARRAY, 2) To UBound(myCELLSARRAY, 2)
Cells(i,j).Value = myCELLSARRAY(i, j)
Next j
Next i
この部分を、myCELLSARRAYの内容を編集する2つのプログラムの実行後にシートに反映するために使っているのですが、2つのプログラムのうち片方のプログラムの後に使った時にのみ、空セルの部分に見えない"何か"が入っているようで困っています。
例えば、上記ステートメント実行後(A,1)に、A列の幅に収まらない文字数の文章が入ったとします。(A,2)から右側のセルに何も入っていなければA,1の内容がA,2やA,3の上にも続けて表示されるのですが、片方のプログラムから呼び出した時にはA,1の文字列はA,2部分にはみ出さず、A,1に収まらない部分は表示されません。
そして、この場合にカーソルをA,2に合わせてからDeleteキーを押すと、見えない"何か"が消えるようで、A,2上にもはみ出して表示されるようになります。
ちなみに上記ステートメントの実行直前または実行中にローカルウィンドウでmyCELLSARRAYの値を確認しても、どちらのプログラムで使った後も空白セルとなる部分の値は同じく何も入っていないようです。(どちらも値は""と表示されます)
両方のプログラムから上記ステートメントを実行した結果のシートをそれぞれCSV形式で保存し、セルの値を確認しましたがどちらも何も入っていません。
この原因は何でしょうか、または、上記ステートメントで、この"何か"が入らないようにするような方法があればアドバイスお願いします。
お礼
回答ありがとうございます。 参考ページで条件に合致しない時に"xlNone"でやると、元の色まで消えてしまいます。 元の色は残したいのですが。