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

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

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

조회 수 11041 추천 수 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 59368
542 VBA 외부 어플리케이션 실행 & 유저폼 일괄 닫기 & 리본 메뉴 사용자 추가 탭 숨기거나 보이게 하는 방법 [7] [레벨:3]엑셀대단해 2012-02-08 4942
541 적응이 느린 함수 작동 file [2] [레벨:4]쟈니 2010-01-04 4939
540 안녕하세요 가입후 첫 질문 입니다. [특정문자열 포함 데이터 분류&추출방법] file [2] [레벨:1]에르메스 2010-01-27 4933
539 작성했던 수식이 모두 이상하게 바뀌었습니다. [1] [레벨:1]kangdongku 2009-07-29 4932
538 pivot 기본 피벗보고서에 있는 데이터 가져오기 file [3] [레벨:1]예진 2013-02-24 4931
537 매크로 없애는 방법 [1] [레벨:1]shawn 2009-09-29 4930
536 엑셀일반 불규칙한 공백을 지닌표를 정리하는 방법 _ 텍스트 나누기를 수식으로 구현해보기 imagefile [5] [레벨:6]파이스 2012-02-28 4926
535 도움요청합니다~~~~~서식기준 데이터 정렬 file [4] [레벨:1]딴무지 2009-12-10 4926
534 엑셀을 엑세스처럼 사용하려면...? [1] [레벨:1]kangdongku 2009-07-15 4914
533 VLookup 엑셀에서 특정내용 참조하여 지정된 셀의 내용 교체 방법 imagefile [레벨:1]한스7 2014-03-16 4905
532 납품서발행.. file [2] [레벨:1]유노 2009-07-23 4895
531 완전초보입니다 [1] [레벨:1]가탕 2009-07-18 4895
530 복사된 숫자를 자료값으로 인식 시키는 방법 요청합니다 file [1] [레벨:1]사랑행복 2009-07-09 4892
529 웹 커리 질문인데요 ^^ ㅎ [1] 웹커리 2009-10-26 4889
528 부분합 혹은 피벗에서... [2] [레벨:1]shawn 2009-08-14 4886
527 VBA 수식이 입력된 셀은 자동으로 색상이 들어가게 하는 방법 [5] [레벨:4]부루끄 2011-07-15 4882
526 피벗테이블 엑셀 백분율 계산 등등~ file [3] [레벨:1]zzziniya 2011-09-23 4874
525 날짜입력하면 다음시트의 같은 날짜에 입력되는 방법 좀 알려주세요~ [2] [레벨:2]불주 2009-07-29 4871
524 abyul에서 색상표불러오기 어떻게 하나요? [1] 말키 2009-07-06 4864
523 기타 해당 단어가 있을경우 추출해 내고 싶습니다. file [2] [레벨:3]블루짱이 2012-12-17 4860