Experts Exchange connects you with the people and services you need so you can get back to work.
Experts Exchange Solution brought to you by ConnectWise
"The solutions and answers provided on Experts Exchange have been extremely helpful to me over the last few years. I wear a lot of hats - Developer, Database Administrator, Help Desk, etc., so I know a lot of things but not a lot about one thing. Experts Exchange gives me answers from people who do know a lot about one thing, in a easy to use platform." -Todd S.
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 6 Or Target.Column = 8 Then
Application.EnableEvents = False
Dim cell As Range, rng As Range
Set rng = Target.Cells
For Each cell In rng
If UCase(Trim(cell.Value)) = "Y" Then
'Your code here
Application.EnableEvents = True
Open in new window
Facing a tech roadblock? Get the help and guidance you need from experienced professionals who care. Ask your question anytime, anywhere, with no hassle.
Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.
Have a better answer? Share it in a comment.
Please enter a first name
Please enter a last name
Must be at least 4 characters long.
Join and Comment
From novice to tech pro — start learning today.
Premium members can enroll in this course at no extra cost.