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

작성자:  

 kimong (kikicon12)

추천:  2
파일:     조회:  1224
제목:   .SpecialCells(xlCellTypeVisible) 관련 질문
     
  * 답변하시는 분들께 도움이 되도록 자신의 환경을 아래 항목 옆에 기재해 주세요.

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

* 아래줄에 질문을 작성하세요 >>
사내에서 작성중이라 파일을 따로 첨부드릴수가 없는데요...

Set FilterRow_F4 = Range(Range("M13").Offset(1, 0), Range("M13").SpecialCells(xlLastCell)).SpecialCells(xlCellTypeVisible)   '눈에 보이는 셀 개수 세기

FilterRowCount_F4 = FilterRow_F4.Rows.Count

ThisWorkbook.Worksheets(1).Range("B9").Value = FilterRow_F4.Rows.Count '테스트용 확인문구 =>오류확인 필요

변수 선언은 제외하고 다음과 같이 필터링 된 행의 개수를 세기위해 코드를 작성하였는데, 숫자 count가 필터링된 개수가 아닌 1로만 출력 되는 문제가 발생하는데 왜그런걸까요;;;
혹시나 해서 .SpecialCells(xlCellTypeVisible)부분을 삭제하고 테스트를 해보았는데 전체 행개수는 잘 나오던데...
혹시 이 정보만으로도 답변가능하다면 답변좀 부탁드립니다....
 
[불량 게시물 신고]  
dewFilterRow_F4 범위에 여러개의 영역이 존재할 경우 첫번째 여역의 행카운터만 합니다.
FilterRow_F4.Areas 영역별로 행수를 카운터 해야 합니다.
01-21 (10:27)
삭제 ■신고
        
  

작성일 : 2019-01-18(09:50)
최종수정일 : 2019-01-18(09:50)