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

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

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

조회 수 10694 추천 수 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 47793
821 엑셀일반 엑셀 이미지 [레벨:3]블루짱이 2023-10-21 2946
820 엑셀일반 셀내용 나누기 궁금합니다. secret [레벨:1]남달춘 2021-06-26 4
819 VBA 엑셀 일괄암호저장 imagefile [1] [레벨:1]천운 2017-03-13 10173
818 엑셀일반 엑셀 특정 자리 숫자 내림 올림 하는 방법이 뭔가요?? [레벨:1]키모스 2016-10-28 10347
817 VBA 매크로를 이용한 exe 파일 자동 실행 방법 문의~ imagefile [레벨:1]hickel 2016-09-07 8816
816 VBA 매크로 질문 드립니다. [레벨:1]ORACLE 2016-08-16 9264
815 피벗테이블 피벗테이블에 매크로 이용해서 사진 삽입하기 imagefile [레벨:1]엑셀초봉 2016-07-11 8190
814 아별툴관련질문 아별 자동 암호설정툴 버그발생 관련 문의드립니다. imagefile [레벨:1]달과6펜스 2016-04-01 8608
813 피벗테이블 피벗테이블에서 (비어있음)을 보이지 않게 할 수 있나요? file [레벨:1]농구경제박사 2016-02-25 10623
812 엑셀일반 csv import 관련 문의 [3] [레벨:1]지살 2016-02-23 10491
811 엑셀일반 목록에서 특정 단어가 포함되는 목록만 콤보박스에 넣을수 있을까요? imagefile [레벨:1]baddisk 2016-01-09 8689
810 셀서식(표시형식) 셀서식이 강제로 변경되는거 같습니다. [레벨:1]곤냥이 2015-10-03 8629
809 이미지,도형 등 VBA로 matlab에 있는 imagesc 함수 구현 방법 [레벨:1]느껴져 2015-09-19 8383
808 VBA 컴파일 에러가 나요? [레벨:1]구름바다 2015-09-14 8934
807 엑셀일반 [긴급문의] 엑셀의 특정셀의 값들이 사라집니다. [1] [레벨:1]용님 2015-09-02 8181
806 VBA 사용자 정의 함수에서 변수의 행번호 추출하기 file [레벨:1]백미90 2015-08-17 7799
805 엑셀수식 하이퍼링크 함수 로케이션의 파일을 자동으로 채우기 [1] [레벨:1]게런티 2015-07-10 7605
804 엑셀일반 웹 쿼리 관련한 질문입니다 [1] [레벨:1]달빛아래말할게 2015-04-20 7878
803 VBA 셀 복사 후 아래셀에 수식 및 메모 붙여넣기 관련 [레벨:4]고수가되고파 2015-04-17 8167