Apply a function after finding a column header

[vmjan02]

I have headers name Cand. Final Status and Email Flag, this headers may move left of right as per the need of a user, is there a vba / or a function that can be applied row wise
currently I am using this function

=IF(AND(AN2="Rejected",AO2=""),1,"")

, it is valid if column AN (Cand. Final Status) and column AO (Email Flag) are unmoved

currently using this vba code

With Worksheets("Candidate Master")
    With .Range("cb2:cb" & .Range("b" & .Rows.Count).End(xlUp).Row)
        .Formula = "=IF(AND(AN2=""Rejected"",AO2=""""),1,"""")"
        .Value = .Value
        '.NumberFormat = "DD-MM-YYYY"
     End With
End With

but need a way a vba code or function as it will first find columns (Cand. Final Status & Email Flag) and then apply function row wise.
any suggestion.

 

[bebo021999]

Not clear for me.
Just guess:
Search row 1 for "Cand.Final Status" with row 2 is "Rejected" AND row 1 for "Email Flag" with row2 is "blank". If both match then input 1 into range column CB2:CB last row?
If not, try to post a screenshot.

 

[vmjan02]

Not clear for me.
Just guess:
Search row 1 for "Cand.Final Status" with row 2 is "Rejected" AND row 1 for "Email Flag" with row2 is "blank". If both match then input 1 into range column CB2:CB last row?
If not, try to post a screenshot.

search header names in Row 1 and then apply formula from row 2 till the last row.

screen shot

 

[bebo021999]

Formula version:

=IFERROR(1/(1/(INDEX($B2:$CA2,MATCH("Cand.Final Status",$B$1:$CA$1,0))="Rejected")/(INDEX($B2:$CA2,MATCH("Email Flag",$B$1:$CA$1,0))="")),"")

Drag down

 

[vmjan02]

kool, its perfect, appreciated