[G2].Formula = "=IF(A2<>"""";""0"";"""")"
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
[G2].Formula = "=IF(A2<>"""";""0"";"""")"
End Sub
[G2].Formula = "=IF(A2<>"""",""0"","""")"
=SI(A5<>"";(F5-F4)/F4; "" )
[G3:G100].Formula = "=IF(A3<>"",(F3-F2)/F2, "" ))"
[G3:G100].Formula = "=IF(A3<>"""",(F3-F2)/F2,"""")"
[G3:G100].Formula = "=IF(A3<>"""",(F3-F2)/F2,"""")"