マクロについての質問です。

質問

現在マクロを作成中で質問させてください。
列数が５の表があるとして、B２に１と入力したら列数が４になり２と入力したら列数が３になりそれ以外の数字なら列数が５のままのようなマクロはあるでしょうか？数字にあまり意味はないです。B２に入力するたび自動実行するような感じにしたいです。よろしくおねがいします。

回答No.1

watabe007 · ベストアンサー

>B２に入力するたび自動実行するような感じにしたいです
Changeイベントで行いましょう

Private Sub Worksheet_Change(ByVal Target As Range)
　　If Target.Address <> "$B$2" Then Exit Sub
　　Select Case Target.Value
　　　　Case 1
　　　　　　MsgBox "列数を4にする処理"
　　　　　　'・・・・・・
　　　　Case 2
　　　　　　MsgBox "列数を3にする処理"
　　　　　　'・・・・・・
　　End Select
End Sub

お礼

changeイベントは現在勉強していました！
参考にさせてもらいます！