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

解決済

質問者：wildcat888
質問日時：2004/02/25 04:10
回答数：2件

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

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

通報する

この質問への回答は締め切られました。

質問の本文を隠す

回答 (2件)

ベストアンサー優先
最新から表示
回答順に表示

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

- 2
- 件

通報する

この回答へのお礼

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

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

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

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

通報する

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