■ 셀에 삽입된 메모 수량 카운팅하는 방법

VBA

작성자

비스타

작성일

2022-01-25 08:56

조회

214

엑셀버전 : M365

운영체제 : 윈도우10

■ 셀에 삽입된 메모 수량 카운팅하는 방법

각 열에 메모가 몇 개 있는지의 여부를 카운팅하고 싶습니다.

함수는 안 되고,,, 매크로 사용해야할 것 같은데...

엑셀 고수님들 도와주시면 감사드리겠습니다.

비스타

회원등급 : 4레벨

포인트 : 156 EP

총질문 : 8 개 (마감율 : 100%)

채택답변 : 0 개

게시글

전체 7

더블유에이 님 264

2022-01-25 15:26

채택된 답변
```
Sub 메모수량세기()

On Error Resume Next
Dim r As Range
Set r = Range("M:M")
Set r = r.SpecialCells(xlCellTypeComments)
MsgBox r.Count

End Sub
```
- 비스타 님 작성자
  
  2022-01-25 15:58
  
  @더블유에이 님 @더블유에이 님 더블유에이 님이 알려 주신 대로 모듈에 붙여넣기 했는데,,, 셀에 수식 명령어를 뭐라고 입력해야 하는지요 ?
  
  첨부 파일로 한 수 가르쳐 주시면 고맙겠습니다. ^^
더블유에이 님 264

2022-01-25 16:44
```
Function CommentCount(r)

On Error Resume Next
Set r = r.SpecialCells(xlCellTypeComments)
CommentCount = r.Count

End Function
```
함수로 사용하실거면 이렇게 수정하면 됩니다 =Commentcount(범위)
- 비스타 님 작성자
  
  2022-01-25 16:53
  
  @더블유에이 님 추가 답변 감사드립니다.
  
  알려주신 대로 실행하니, 셀 지정 범위의 셀 수만 카운팅 되고,
  
  메모 삽입을 해도 메모 수는 카운팅이 안 되네요~~
- 비스타 님 작성자
  
  2022-01-25 17:14
  
  @더블유에이 님 더블유에이 님!
  
  죄송하지만, 제가 첨부한 파일에 작성해 주시면 안 될까요 ?
  
  사용하는 파일의 용량이 조건부서식이 많아서(8MB) 꼭 필요한 기능입니다.
  
  다시 한번 부탁 드립니다^^!
  - 더블유에이 님 264
    
    2022-01-28 02:25
    
    @비스타 님 수식에 오류가 있었네요.. 유첨파일로 첨부해드리니 다시 확인해보세요..^^ 도움이 되셨길..
    
    Function CommentCount(rng) On Error Resume Next Dim r As Range Dim x, i As Long For Each r In rng x = Len(r.Comment.Parent) If Err.Number <> 0 Then Err.Clear Else i = i + 1 End If Next CommentCount = i End Function
    
    첨부파일 : 메모-카운트하기-1.xlsm
    
    비스타 님 작성자
    
    2022-01-28 10:42
    
    @더블유에이 님 해결됐습니다. 감사합니다 ^^

« 엑셀 데이터통합 기능 이용시 합계가 달라지는 이유

셀에 입력시 자음 모음 분리문제 »

목록보기

전체 6,403

번호	카테고리	제목	작성자	작성일	추천	조회
알림		[🏆 진짜쓰는 실무엑셀 스터디] 1기 - 우수 졸업생 및 후기, 축하합니다! (8) 오빠두엑셀 \| 2022.04.30 \| 추천 9 \| 조회 1126	오빠두엑셀	2022.04.30	9	1126

공지사항	함수/공식	⭐ [더 나은 커뮤니티 문화를 위한 Q&A 글 작성 규칙] ⭐ (62) 오빠두엑셀 \| 2021.10.28 \| 추천 79 \| 조회 4436	오빠두엑셀	2021.10.28	79	4436
34219	기능/도구	New 주말 날짜가 적힌 셀의 행 일부분이 자동으로 색 채우기가 되는 방법 있나요? forest choi \| 00:59 \| 추천 0 \| 조회 14	forest choi	00:59	0	14
34218	함수/공식	New VLOOKUP 함수 여러개 값 가져오기에서 빈셀은 빼고 데이터가 작성된 것만 가져오기 문제 관련 moonlights \| 00:26 \| 추천 0 \| 조회 15	moonlights	00:26	0	15
34213	함수/공식	New [vlookup] 다른 엑셀파일 출력값의 ture 값 색변경하기 pk2616 \| 2022.05.19 \| 추천 0 \| 조회 14	pk2616	2022.05.19	0	14
34205	VBA	New [택배송장만들기] 수량만큼 행추가하고 복사하기 (1) 수메리안 \| 2022.05.19 \| 추천 0 \| 조회 25	수메리안	2022.05.19	0	25
34204	파워쿼리/피벗	New 쿼리 평수값에서 m2 제거하고 숫자만 남길 수 있는 방법 있을까요? (1) shxhehskc \| 2022.05.19 \| 추천 0 \| 조회 25	shxhehskc	2022.05.19	0	25
34202	파워쿼리/피벗	New 쿼리파일에서 한 칸만 삭제하기 shxhehskc \| 2022.05.19 \| 추천 -1 \| 조회 28	shxhehskc	2022.05.19	-1	28
34199	함수/공식	New 시간대별 여러 시트 값 합치기 (3) sjlee**** \| 2022.05.19 \| 추천 0 \| 조회 35	sjlee****	2022.05.19	0	35
34197	함수/공식	New 일수를 개월 일로 나타나는 방법을 알려주세요 (1) nab \| 2022.05.19 \| 추천 0 \| 조회 24	nab	2022.05.19	0	24
34196	함수/공식	New 합계 구하기 _ 도와주세요... ㅠㅠ (2) 연어샐러드 \| 2022.05.19 \| 추천 0 \| 조회 28	연어샐러드	2022.05.19	0	28
34191	파워쿼리/피벗	New 하나의 열의 내용 중 중복되는 내용을 각각 다른 열에 배치할 수 있을까요? (1) shxhehskc \| 2022.05.19 \| 추천 0 \| 조회 24	shxhehskc	2022.05.19	0	24
34190	파워쿼리/피벗	New 쿼리 실행 중 몇개의 행만 첫 행을 머릿글로 사용하기 (2) shxhehskc \| 2022.05.19 \| 추천 0 \| 조회 24	shxhehskc	2022.05.19	0	24
34186	문서서식	New 문서 서식 글자 바뀌는것 질문 (1) 동준 \| 2022.05.19 \| 추천 0 \| 조회 16	동준	2022.05.19	0	16
34185	문서서식	New 카드내역 다운받아 사용금액 합계를 했는데.. 합계가 안되네요 (1) akdlt**** \| 2022.05.19 \| 추천 0 \| 조회 21	akdlt****	2022.05.19	0	21
34180	구글시트	New REGEXEXTRACT (2) 답변완료 마법의손 \| 2022.05.19 \| 추천 0 \| 조회 32	마법의손	2022.05.19	0	32
34179	대시보드	New 엑셀 하단에 시트이름 나온곳 넓게 쓰고 싶은데 고정안될까요? (1) 태봉 \| 2022.05.19 \| 추천 0 \| 조회 27	태봉	2022.05.19	0	27
34175	문서서식	New 빈칸 셀위에 색상표시? (1) km**** \| 2022.05.19 \| 추천 0 \| 조회 27	km****	2022.05.19	0	27
34174	VBA	New VBA changelink 이용하여 원본파일 변경 시, 워크시트도 같이 변경하는 방법 (3) 쿠킹왕자 \| 2022.05.19 \| 추천 0 \| 조회 30	쿠킹왕자	2022.05.19	0	30
34171	구글시트	New 다른 시트에서 원하는 값 불러오기 (11) 나도엑셀천재? \| 2022.05.19 \| 추천 1 \| 조회 45	나도엑셀천재?	2022.05.19	1	45
34169	함수/공식	New 오빠두 강의중 텍스트나누기 공식 질문드립니다. 월마리아 \| 2022.05.19 \| 추천 0 \| 조회 40	월마리아	2022.05.19	0	40
34166	차트/그래프	New 누적 가로막대 차트 비율이 안맞습니다 (2) 답변완료 어제부터VBA \| 2022.05.18 \| 추천 0 \| 조회 35	어제부터VBA	2022.05.18	0	35
34164	파워쿼리/피벗	New DRM걸린 문서를 오피스365 엑셀의 파워쿼리에서 처리하면 에러가 발생을 합니다. (1) new**** \| 2022.05.18 \| 추천 0 \| 조회 24	new****	2022.05.18	0	24
34162	함수/공식	New 다른 시트와 연동, vlookup 함수 연동 오류 해결 방법ㅜㅜ 나도엑셀천재? \| 2022.05.18 \| 추천 1 \| 조회 22	나도엑셀천재?	2022.05.18	1	22
34152	VBA	New 변수 선언에 필요한 변수명을 동적으로 만들 수 있나요? (Dynamic Variable Name) (7) 답변완료 나는나 \| 2022.05.18 \| 추천 0 \| 조회 49	나는나	2022.05.18	0	49
34148	문서서식	New 엑셀 기본표시형식 설정 해결방법 (1) zoe \| 2022.05.18 \| 추천 0 \| 조회 30	zoe	2022.05.18	0	30
34146	피벗테이블	New 피벗테이블 열 합계 시 값이 다르게 나옵니다. 또한 한 아이템이 시간에 따라 2개의 가격을 가질 때 어떻게 처리를 해야하나요? (1) 엽이 \| 2022.05.18 \| 추천 2 \| 조회 28	엽이	2022.05.18	2	28
34144	함수/공식	New 음수를 제외한 양수들만으로 오름차순으로 순위 내는법 (1) 리테일러 \| 2022.05.18 \| 추천 0 \| 조회 33	리테일러	2022.05.18	0	33
34143	함수/공식	New 평일 출근부 만들기 (3) 답변완료 왜사는건지 \| 2022.05.18 \| 추천 0 \| 조회 43	왜사는건지	2022.05.18	0	43
34136	함수/공식	New 백분율의 합계? 백분율의 평균 값?이 다른이유가 있을까요? (4) 한다운 \| 2022.05.18 \| 추천 0 \| 조회 29	한다운	2022.05.18	0	29
34135	함수/공식	New 음수를 제외한 양수들의 합만으로 순위 내는법 (8) 답변완료 리테일러 \| 2022.05.18 \| 추천 2 \| 조회 51	리테일러	2022.05.18	2	51
34134	VBA	New VBA 필터 지정후 이미지 저장 문의 (6) 답변완료 다다익선 \| 2022.05.18 \| 추천 0 \| 조회 36	다다익선	2022.05.18	0	36