エクセルのマクロ

質問

セルＡ１に、ａ２からａ９０までの任意の文字を入力した後にマクロを実行します。
セルＡ１にａ７と入力されている時はセルＢ１にａ６と表示され、セルＡ１にａ８６と入力されている時はセルＢ１にａ８５と表示されるようなマクロを教えてもらいたいのですが。
Ｂ１は必ずＡ１の数字の部分が１つ少なくなるということです。

回答No.1

kokiriko · ベストアンサー

Sub ボタン1_Click()

Cells(1, 2) = Mid(Cells(1, 1), 1, 1) & Val((Mid(Cells(1, 1), 2, 2)) - 1)

End Sub

これで良いはずです。これはボタンを押したときの場合ですから、中の部分だけ
利用してみて下さい。

お礼

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

回答No.2

imogasi

Sub test01()
d = Range("a1").CurrentRegion.Rows.Count
For i = 1 To d
n1 = Mid(Cells(i, 1), 2, Len(Cells(i, 1)) - 1)
n = Val(n1) - 1
Cells(i, 2) = "a" & Trim(Str(n))
Next i
End Sub

お礼

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