IS12F お知恵の解決方法

質問者が納得質問の設定範囲限定ですが Private Sub Worksheet_Change(ByVal Target As Range) If Target.Count <> 1 Then Exit Sub If Target.Value <> "あ" Then Exit Sub If Intersect(Target, Range("A10:A30,C10:C30,E10:E30")) Is Nothing Then Exit Sub Dim my...