1. FAQ
  2. 엑셀(Excel)
  3. AfterEffects
  4. Premiere
  5. Photoshop
  6. ETC

이 게시판은 아별닷컴 회원만 질문을 올릴 수 있습니다. 회원에게 주어지는 특권인셈이지요. 회원이 아닌 분들은 열람만 가능합니다.

셀색깔별로 합계를 내고 싶습니다.

조회 수 10744 추천 수 0 2010.04.09 01:50:05

안녕하세요.

 

 셀색별로 합계를 내고 싶습니다.

 

현재 저는 2007를 사용중입니다

 

정렬을 한 후에 합계를 내려고 생각해 보았습니다.

그래서 자동필터를 이용하여 거기서 셀 색별정렬을 했습니다.

정렬된 것을 합계를 내려고 잡으니깐 합계는 정렬 된 것만 합계가 된느것이 아니라. 'C1:C5' 이런식으로 다 잡혀버려서

일일이 하나하나 지정하여 합계를 내야 하더라구요.

안좋았습니다.

 

 

좀더 간단하게  불규칙한 셀들을 합계내는 방법이 무엇인가요?

파일에 보면 소계에다 합계를 내는 것입니다.

 

한열마다  셀색별 합계내는 방법과

통째로 셀색별 합계내는 방법


댓글 '1'

profile

[레벨:30]아별

2010.04.11 16:44:31
*.75.228.246

안녕하세요? 자주되는 질문중에 하나군요..

그래서 이참에 해당 기능을 아별툴 기능에 추가했습니다. (20100411-1 버전을 설치해야합니다.)

아래처럼 사용하면 원하는 값을 찾을 수 있습니다.

=sumbyCellColor(대상셀범위,찾을셀음영색이 있는 셀)

 

첨부파일을 열어보시면 사용자 정의함수를 확인할 수 있습니다.

abyul_QnA_SumByCellColor_simple_20100411-1.xls

 

참고하세요.

 

1. 실제 아별툴에 적용된 코드는 좀 복잡합니다. 에러처리가 포함되어 있거든요.

2. 아별툴에는 아래의 사용자 정의 함수가 더 있습니다.

     sumbyCellColor( 대상 셀범위, 찾을 셀 음영색이 지정된 셀 또는 색상 값) : 특정셀 음영색이 지정된 셀들의 합계를 구함.

     countbyCellColor( 대상 셀범위, 찾을 셀 음영색이 지정된 셀 또는 색상 값) : 특정셀 음영색이 지정된 셀의 개수를 구함.

     sumbyFontColor( 대상 셀범위, 찾을 폰트색이 지정된 셀 또는 색상 값) : 특정 폰트색이 지정된 셀의 합계를 구함.

     countbyFontColor( 대상 셀범위, 찾을 폰트색이 지정된 셀 또는 색상 값) : 특정  폰트색이 지정된 셀의 개수를 구함.

 

첨부파일에 작성된 사용자 정의 함수의 코드는 아래와 같습니다.

 

 

Option Explicit
 
# 특정 셀 음영색을 기준으로 합계 내는 사용자 정의 함수
Function sumByCellColor(targetRange As Range, rngFind As Range)
    Dim i As Integer
    Dim r As Range
    Dim doubleSum As Double
    Dim doubleColor As Double
    '# 찾을 색상값을 추출하여 변수에 지정
    doubleColor = rngFind.Interior.Color
    '# 대상범위 셀을 순환하면서 해당 음영셀이면 합계에 더함
    For Each r In targetRange
        If r.Interior.Color = doubleColor Then
            doubleSum = doubleSum + r.Value
        End If
    Next r
    '# 합계를 결과로 돌려줌.
    sumByCellColor = doubleSum
End Function

첨부
문서 첨부 제한 : 0Byte/ 2.00MB
파일 제한 크기 : 2.00MB (허용 확장자 : *.*)
List of Articles
번호 제목 글쓴이 날짜sort 조회 수
공지 공지 [공지] 아별닷컴의 엑셀 질문방 폐쇄합니다. 카페 질문방 이용하세요.. imagefile [레벨:30]아별 2015-04-23 50382
542 엑셀파일 새창에서 열기 [2] [레벨:1]Mr아프락사스 2011-06-14 4269
541 countifs 질문합니다. file [3] [레벨:8]로또 2011-06-15 2487
540 부분합이요 file [3] [레벨:2]양다원 2011-06-25 2197
539 엑셀2007 자동필터 문의 imagefile [2] [레벨:2]도시남자 2011-06-27 3341
538 피벗테이블 기능 file [4] [레벨:5]정화 2011-06-29 2348
537 vba에 관해 질문드립니다. (DB에서 개인별 카드로 인쇄하는 방법) file [2] [레벨:1]자인 2011-07-04 2124
536 엑셀 인쇄하면 그림파일이 출력이 안되요.. [1] [레벨:2]만쥬 2011-07-06 8141
535 소팅하는법좀 제발 알려주세요 [1] [레벨:1]나는너다 2011-07-07 2037
534 필터링 관련 질문... [2] [레벨:4]나카타 2011-07-08 2424
533 빠른실행도구 질문드립니다. imagefile [2] [레벨:10]8877 2011-07-10 2030
532 매크로 함수를 VBA로 바꾸면 될까요??? (ExecuteExcel4Macro in UDF) file [2] [레벨:1]테스킨 2011-07-12 3044
531 엑셀탭에 대한 질문입니다. file [3] [레벨:5]정화 2011-07-13 2271
530 Alt+tab을 눌렀을 경우 엑셀파일이 없어지는 것 관련 질문드립니다. [2] [레벨:2]헤히후 2011-07-13 2211
529 차트에서 레이블의 숫자를 교체하는 법 imagefile [2] [레벨:4]쟈니 2011-07-14 2643
528 열숨기기 기능에 대해서 [3] [레벨:3]말키리 2011-07-14 3526
527 VBA 수식이 입력된 셀은 자동으로 색상이 들어가게 하는 방법 [5] [레벨:4]부루끄 2011-07-15 4782
526 엑셀수식 특정셀 선택 후 하이픈 삽입 하는법 [3] [레벨:4]부루끄 2011-07-15 3471
525 VBA VBA로 정렬하는 법 문의 file [6] [레벨:4]부루끄 2011-07-21 6306
524 드롭다운 메뉴를 만들고 싶습니다 file [4] [레벨:2]파란달 2011-07-21 3207
523 VBA 현재 선택 된 셀을 기준으로 같은방식의 연산결과 값을 산출하는 법 file [1] [레벨:4]부루끄 2011-07-26 4339