空白セルを空セルに置き換える方法（エクセル)

　Excelで、空白に見えるセルを、空のセルに置き換える簡単な方法を教えてください。
　長さ０の文字列扱いである「""」のセルが多数散在してます。これを数値扱いの空セルに置き換えたいのです。一つひとつDelキーを押したのでは手間がかかります。

　「エクセル　空白　削除」などの検索では同じ質問はみつかりませんでした。

No.2 ベストアンサー 回答者： nishi6 回答日時： 2004/02/25 12:31

『""の長さゼロのセル』は、『'』が入力されたセルでしょうか。

これを消去する機能は思いつかないので作ってみました。


Alt+F11でVBE画面に移動し、挿入→標準モジュールで標準モジュールを挿入し、下記コードを貼り付けます。
シートに戻り、ツール→マクロ→マクロで下記マクロを実行します。

アクティブなシートの『'』をクリアします。


ここから
↓
Sub stringO_Delete()
　　Dim Rng As Range '// セル

　　'// 使っている範囲
　　ActiveSheet.Cells.SpecialCells(xlCellTypeConstants).Select

　　For Each Rng In Selection
　　　　If Len(Rng.Text) = 0 Then
　　　　　　Rng.ClearContents
　　　　End If
　　Next

　　Range("A1").Select
End Sub

この回答へのお礼

>　『""の長さゼロのセル』は、『'』が入力されたセルでしょうか。

　=IF(条件,"",結果)　によって作られました。『'』ということになるのでしょうか（すみませんわかりません）。


ありがとうございました。Sub stringO_Delete()でうまくいきました。


先日、方法がわからず、見えない空白を一匹いっぴきつぶすのにに３時間もかかりました。これからはこれで一発です。

お礼日時：2004/02/25 23:39

No.1 回答者： mshr1962 回答日時： 2004/02/25 09:14

""は置換で削除できませんか？

検索する文字列を""
置換する文字列は未入力
完全に同一なセルだけを検索するにチェック
すべて置換
でいいと思います。

ただ、エクセルでは""は表示されるはずです？
=""や=IF(条件,"",結果) の様な場合は表示されませんが．．．

この回答へのお礼

さっそくありがとうございました

>　=""や=IF(条件,"",結果) の様な場合は表示されませんが

=IF(条件,"",結果)　です。アクセスへのリンクで型の自動認識がうまくいかないのです。

。

お礼日時：2004/02/25 23:27