Excelで文字の置換について

質問

Excelで文字の置換を行いたいのですが、
ある特定の文字以外をすべて置換する方法を教えていただけませんでしょうか？

例えば、数字の0だけは置換せずに、それ以外の文字（あ、1、aなど）をすべてzに置換するといったようなことしたいのですが、
何か素早く置換できる方法がありましたら教えていただければと思います。

よろしくお願い致します。

回答No.1

noname#65776 · ベストアンサー

VBAなら下記のように書けば出来ます。

Sub test()
Dim i, j
　For i = 1 To 100　'行数を指定：MAX=65536
　　For j = 1 To 10　'列数を指定：MAX=256
　　　If Worksheets("Sheet1").Cells(i, j) <> 0 Then
　　　　Worksheets("Sheet1").Cells(i, j) = "z"
　　　End If
　　Next j
　Next i
End Sub

お礼

ご回答ありがとうございます。

VBAの知識はまったくないので、これを機会に勉強し
さっそく実践してみたいと思います。

返事が遅くなりまして申し訳ありません。
ありがとうございました。