excle VBA 怎么写sum 函数?

excle VBA 怎么写sum 函数?
例如 有以下表格
A B C D E F G
1 10 20 30 40 50 60 sum（A1：F1）
2 10 20 30 40 50 60 sum（A2：F2）
3 10 20 30 40 50 60 sum（A3：F3）
一共有多少行是动态的 从别的地方读过来的 要在G那个单元格 把前面的 单元格相加
如果在表格上G1的值就是A1：F1,G2的值就是A2：F2,以此类推,如果用vba来写怎么写呢?主要是读入的行数不确定,所以不可能在表格上事先写好A?：这种.只能用vba先判断有几行 在循环把每一行的值相加 放到G的位置,