Sub X()
Dim rngData As Range
Dim lngRow As Long
With Sheets("SECURITY REPORT") 'spreadsheet with data
Set rngData = Range("A1", Cells(Rows.Count, 1).End(xlUp))
End With
For lngRow = 1 To rngData.Rows.Count
If UCase(rngData.Cells(lngRow, 1).Offset(0, 8).Value) = "NA" Then '''want to see if "NA" is in column J
rngData.Cells(lngRow, 1).Offset(0, 9).Value = "TRUE" '''If "NA" is in Column J, want to change column K to "TRUE"
End If
Next
End Sub
Found this code on another thread and have tried to change it to suit my needs, but it doesn't work at all. Can someone give me some guidance?