2011-12-01 5 views
0

Excel 스프레드 시트가 있습니다. 나는 열을 요약했지만 지금은 행 전체에 걸쳐 개별 합계를 합계하여 합계를 계산해야합니다. 열은 P, Q, R, S, T입니다. 각 워크 시트마다 항상 다른 수의 행이 있으므로 데이터의 마지막 행을 얻었으므로 합계가 두 행이되도록 두 행을 추가합니다 아래로 데이터에서. 개인 총계와 같은 행에 열 B에 총계를 넣을 것입니다. 이것은 내가 지금 가지고있는 것입니다. 어떤 도움이라도 성취 될 것입니다.vb.net을 사용하여 Excel에서 행을 정리하십시오.

Dim r As Integer 
r = lastRow + 2 
orange = oSheet.Range("B" & r) 
orange.Select() 
oSheet.Cells(r, "B").Formula = _ 
      "=SUM(P:" & r + "Q:" & r + "R:" & r + "S:" & r + "T:" & r & ")" 

"이 오류가 나타납니다."문자열 "Q :"에서 'Double'을 (를) 입력하면 변환 할 수 없습니다. "

감사합니다. Lora

+2

: 코드는'r'과'Q를 추가하려고 :'그들은 모두 숫자 –

+1

을 BTW있는 것처럼. 제목은 "vb.net"이고 태그는 "vba"입니다 - 혼란 스럽습니다. – Juliusz

답변

0

각 셀을 나열 할 필요는 없습니다. 다음은 충분해야한다 : 당신은 & 연결에 사용해야

oSheet.Cells(r, "B").Formula = "=SUM(P" & r.ToString() & ":T" & r.ToString() & ")" 
관련 문제