Hello I currently am trying to have my code Read/Find by Column Headers instead of Columns M, O, and U that you see in my code below. I just want to make sure that it reads and finds the headera and then goes through the code that way if anyone adds any columns it doesn't effect the code any.
VBA Code:
Sub BlankWarranty()
'Looks for Additions with a Blank Warranty in WarrantyEnd Column'
Dim r1 As String, r2 As String
Dim lr As Long
lr = Range("M" & Rows.Count).End(3).Row 'Transaction Type'
r1 = Range("M2:M" & lr).Address 'Transaction Type'
r2 = Range("O2:O" & lr).Address 'WarrantyEnd'
'Notes added in Analyst Notes'
Range("U2:U" & lr).Value = Evaluate("=IF(" & r1 & "=""Addition"",IF(ISBLANK(" & r2 & "),""Review - Blank Warranty Addition"",""""),"""")")
End Sub