나눔터  
  HOME > 나눔터 > 묻고답하기 > 엑셀
엑셀
엑셀에 대한 질문과 답변을 올려주세요. 단, 취지에 맞지 않는 글은 운영자가 삭제합니다.
 "000 님, 도와주세요", "부탁 드립니다.", "급합니다!" 등과 같이 막연한 제목을 달지 말아주세요.
[필독] 빠르고 정확한 답변을 얻는 16가지 Tip !
[필독] 저작권법 개정에 따른 이용안내
작성자:  

 성우진입니다 (wj86511)

추천:  2
파일:     Re_산청누리복지센터_근로자고용정보현황조회_고용_(2).xlsm (26.1KB) 조회:  826
제목:   vba에서 sum 값을 입력하고 싶습니다.
     
  * 답변하시는 분들께 도움이 되도록 자신의 환경을 아래 항목 옆에 기재해 주세요.

 - 엑셀 버전(95,97,2000,xp,2003,2007): 2010

* 아래줄에 질문을 작성하세요 >>

안녕하세요, 일전에 도움을 받아 문제 없이 쓰고 있었는데
좀 더 개선을 해야 하는 부분이 생겨 문의드립니다.

vba로 이진결과를 계산한 셀의 다음 셀에 그 합을 더한 값 표시와
그 더한 값 표시를 평균내는 값을 구하고 싶은데 sum부분에서 에러가 뜹니다.

도와주세요. 그리고 average는 범위가 아니라 각 변수별로 입력해야 하는 건가요? 그리고 sum이나 average같은 함수에서도 cells(rows.count, "B").end(xlup)(2)같은 값이 변수로 먹는지도 여쭙니다.
 
[불량 게시물 신고]  
vbav넵 해당 데이터 시트가 sheet1이라고 할때
    Dim ws1 as worksheet
    set ws1 = worksheet("sheet1")
    Dim vdd As Long
    Dim vrng As Range

    vdd = ws1.Cells(Rows.Count, "b").End(xlUp).Row
    Set vrng = ws1.Range("d2:d" & vdd)
    vrng = "=m2+n2+o2"

와 같이 짠다면 m2, n2, o2 셀부터 데이터 존재하는 행까지 자동채우기로 계산될겁니다.
08-04 (14:26)
삭제 ■신고
성우진입니다Dim l As Long
Dim l2 As Range
Dim l3 As Integer
 

 l = ws.Cells("12", Columns.Count).End(xlLeft).Column
    Set l2 = ws.Range("c12:12" & l)
    l2 = worksheetfuction.Sum(l2)
    l3 = l2.Value

결과값이 안 나와서
이렇게 해봤는데 worksheetfuction은 왜 에러가 뜨는 걸까요? ㅠ
08-04 (15:46)
삭제 ■신고
        
  

작성일 : 2023-08-04(10:36)
최종수정일 : 2023-08-04(11:45)
 


 ◎ 관련글

  제 목   작성자   날짜
vba에서 sum 값을 입력하고 싶습니다. 성우진입니다 2023-08-04
[RE]vba에서?sum?값을?입력하고?싶습니다. 재현 2023-08-04
[RE]vba에서?sum?값을?입력하고?싶습니다. 성우진입니다 2023-10-29
[RE]vba에서?sum?값을?입력하고?싶습니다. 성우진입니다 2023-10-29