the object variable or with block variable not set

Question

Iam having error in my code, it says in .formula = TheFormula (variable) is not set. Please help me to resolve this script.

     Private Sub Worksheet_Selecti