2014-10-25 3 views
1

다른 통합 문서에서 추출한 일부 데이터가 있으며 데이터 끝의 열을 더하고 싶습니다. 문제는 사용자가 데이터를 추출한 후 데이터를 변경하면 자동으로 업데이트되도록 마지막 셀에 합계 수식을 지정하는 것입니다. 데이터는 행 8에 시작하고, 그래서 여기에 길이가 달라질 것은 내가 지금까지 뭘하려 : 난 당신이 구문에서 변수를 사용할 수 없습니다 추측 때문에다이내믹 범위 수식

ActiveCell.Range("a1").End(xlDown).Select 
    LastRow = Activecell.Row 
    ActiveCell.Offset(2,0).Range("a1").Select 
    ActiveCell.FormulaR1C1 = "=sum(R[-LastRow + 6]C:R[-2]C)" 

이것은 오류를 반환합니다. 내가 무엇을 할 수 있을지?

+0

수식이 칼럼의 마지막에해야합니까? 인접한 열에있을 수 있다면 일부 셀에서는 단순히 = SUM ($ A : $ A)을 사용할 수 있습니다. 열의 끝에 있어야하는 경우 행을 삽입하여 더 많은 데이터를 추가 할 때 = SUM ($ A $ 1 : $ A $ 10)과 같은 수식이 적절하게 조정되어야합니다. –

+0

수식은 열의 끝에 있어야합니다 –

답변

0

다음에 마지막 줄 올바른 변경되는 코드의 나머지 가정 :

ActiveCell.FormulaR1C1 = "=sum(R[-" & Cstr(LastRow+6) & "]C:R[-2]C)" 
+0

이 코드와 함께 응용 프로그램 정의 또는 개체 정의 오류 1004가 발생합니다. –

+0

LastRow의 가치는 무엇입니까? –