안녕하세요?
시트의 Selection Change 이벤트를 이용하시면 됩니다.
Private Sub Worksheet_Selecti[안내]태그제한으로등록되지않습니다-xxonChange(ByVal Target As Range)
With Target
If Not Intersect(Target, Range("선택범위")) Is Nothing Then
If .Cells.Count = 1 Then
If .Value = "V" Then
.ClearContents
Else
.Value = "V"
End If
End If
End If
End With
End Sub
V표시.xlsm
첫댓글 아항 !!! 진짜 되네요 ㅋㅋㅋㅋㅋ 감사합니다 ^^!!!!!!!