hmltnangel
Active Member
- Joined
- Aug 25, 2010
- Messages
- 290
- Office Version
- 365
- Platform
- Windows
Looking to see if I can get this to run properly. I tried, but failed The code continually runs and loops until I Ctrl + Break
Effectively I want it that if you select a cell in the range identified, and the cell in the corresponding row, column 17 = too new to rate, then msg box pops up.
Effectively I want it that if you select a cell in the range identified, and the cell in the corresponding row, column 17 = too new to rate, then msg box pops up.
VBA Code:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'For Each cell In Range("V4:V1971")
'If Cells(cell.Row, 17).Value = "0 - Too new to rate" Then
'MsgBox "Too New To Rate: Blah Blah"
'ElseIf Cells(cell.Row, 17).Value <> "0 - Too new to rate" Then
'End If
'Next
End Sub