Compile a Value in VBA Instead of Cell

On my worksheet I have a series of formulas in sperate cells as follows:

Cell F22 =If(A22=1, 2)
Cell G22 =If(A22=2, 1)
Cell H22 =If(A22=3, 0)
Cell I22 =Sum(F22:H22)

I then use the value in I22 in other functions by using "I22" in their formulas. Is there a way in VBA to perform the same task so I can refer to the value in other formulas without assinging the value to a cell in the worksheet?

Also, how do I set the macro to always update the calculations when new numbers are entered on the spreadsheet?

Thanks!