2011-08-23 4 views
0

큰 Excel 시트에서 행을 필터링하고 싶습니다. 특정 내부 색 (예 : 노란색)이있는 셀만 표시하고 싶습니다. 간단한 방법이 있습니까? 내 생각이 simillar VBA를 기능 (뭔가를 쓰는 것은 here입니다 :이 기능이 때셀 내부 색상을 기반으로 Excel 셀을 필터링하는 방법은 무엇입니까?

*public function kolory(komorka as range) 
kolory-komorka.interior.color 
end function* 

, 나는 각 색상에 대한 특정 코드를 생성하고 심지어 그것을 확장 할 수 있습니다 (를 필터링하는 데 사용할 수 있어요 이 코드를 사람이 읽을 수있는 정보로 변환하는 셀렉트 케이스 구조를 추가하십시오.) 불행하게도 Excel은 내 기능을 볼 수 없지만 매크로가 활성화되어 있어도 많은 경우 VB에서 작성된 코드를 사용할 수 없습니다.

+0

이 함수를 어떻게 작동하지 않습니다 필요하지 않습니다? "불행히도 Excel에 내 기능이 표시되지 않습니다"라는 메시지가 명확하지 않습니다. – JMax

+0

처음에는 해당 문자를 제거하십시오. 그들이 뭘하고있는거야? –

답변

0

매크로 창에 나타나지 않는다는 것을 의미합니까? 워크 시트 함수/사용자 정의 함수로 표시하겠습니까? UDF로 사용하려면 반환 유형이 있어야하며 일반 모듈에 코드를 넣어야합니다. 당신이 비 선택적 입력 (komorka as range)를 필요로하기 때문에 당신이 할 수없는 독립형 루틴로 사용하려는 경우 코드는

public function kolory(komorka as range) as integer 
    dim cellColor as integer 
    cellColor = komorka.interior.color 
    kolory = cellColor 
end function 

과 같을 것이다. komorka 값을 전달할 수있는 함수/하위를 포함하는 함수에서 호출해야합니다. kolory 함수를 호출 할 수있는 코드가 있으면 코드에서 사용할 수 있습니다. 코드는 위와 같을 것입니다.

Public Function kolory(komorka As Range) As Long 
    kolory = komorka.Interior.Color 
End Function 

* 제거하고 =- 교체받을 즉 :

+0

가능한 모든 데이터 유형 중에서 색상 정보를 포함하기 위해 왜 'String'을 사용하겠습니까? –

+0

예, 당신 말이 맞습니다 ... 나쁜 선택입니다. 나는 정수로 바꿨다. 보다 나은? – Brad

+0

악화 ... 시도해보고 무슨 일이 일어나는 지보십시오. 더 자세한 것은'.Color'와'RGB' 함수에 대한 도움말 파일을보십시오. –

0

이 함수에 대한 올바른 구문입니다.

Excel 시트에서 A1 셀의 색을 반환하려면 다른 셀에 =kolory(A1)을 입력하십시오. 방금 VBA 코드를 작성하는 경우

은 물론, 당신은 기능이 komorka.Interior.Color 단지 래퍼이기 때문에 kolory ...

관련 문제