Pass Variable to “Relation” parameter in Excel Solver VBA

Question

I am attempting to change the relation in VBA solver based on a formula found in cell (I28). Sometimes I want the constraint relationship to be "=" and sometimes &