エクセル マクロ自動実行について

質問

エクセルのVBAについて
コードがわからないので質問します。
（超初心者です。）

表現が正しいのかわかりませんが
例
セルの範囲
A1セルからA10まで

A1セルに1と入力すると
自動でaに変換される

A2セルに1と入力すると
自動でaに変換される

という形にコードを作りたいのですが
コードが行き詰まってしまいわからないです。

すいませんがコードを
書いて頂けないでしょうか？

よろしくお願いします。

回答No.1

oboroxx · ベストアンサー

下記のVBAのコードを、シートのモジュールにコピペしてみてください。

Private Sub Worksheet_Change(ByVal Target As Range)
Dim rng As Range

Set rng = Intersect(Range("A1", "A10"), Target)
If Not rng Is Nothing Then
If rng.Value = 1 Then
rng.Value = "a"
End If
End If
End Sub