Access中如何实现自动往下复制公式？

问题：不指定l,m参数，如何实现自动往下复制公式？

Sub aaaa() Dim i As Integer Dim j AsInteger Dim l As Integer Dim m As Integer l = 10 m = 15 i = 4 j = 10Range("C" & j & "").Select Cells(10, 3).Formula ="=sum(B" & i & ":" & "B" & j& ")/7" Selection.AutoFill Destination:=Range("C" &l & " : C" & m & "") '已在cells(10,3)单元格中得到公式=sum(B4:B10)/7'现在我想自动复制公式到本列以下的单元格 '(如：cells(11,3)、cells(12,3) ……中得到公式) End Sub