If there is a value in column F then total in column G

[djfscouse]

Hi,

Below is a formula that I want in VBA but if there is no value in column F then it should not write a 0 or anything in column G.

    Range("G1").Formula = "=SUMIF(A:A,A1,F:F)"
    Range("G1").AutoFill Destination:=Range("G:G")

Thanks,

David