메인 컨텐츠로 가기

Excel에서 주석 표시기 색상을 변경하는 방법은 무엇입니까?

Excel에서 메모를 삽입하면 셀 오른쪽 상단에 작은 빨간색 삼각형 표시기가 나타납니다. 많은 Excel 사용자는 빨간색 표시기 색상을 원하는 다른 색상으로 변경할 수 있는지 궁금 할 수 있습니다. 이 기사에서는이 작업을 완료하기위한 해결 방법에 대해 설명합니다.

VBA 코드로 주석 표시기 색상 변경


화살표 블루 오른쪽 거품 VBA 코드로 주석 표시기 색상 변경

주석 표시기의 색상을 빠르고 쉽게 변경할 수있는 직접적인 방법은 없지만 다음 VBA 코드를 사용하면 각 주석 표시기가 활성 시트에 필요한 특정 색상과 겹치는 삼각형 모양을 그릴 수 있습니다.

1. 주석 표시기 색상을 변경할 워크 시트를 활성화합니다.

2. 누르고 ALT + F11 키를 눌러 Microsoft Visual Basic for Applications 창.

3. 딸깍 하는 소리 끼워 넣다 > 모듈을 클릭하고 다음 코드를 모듈 창.

VBA 코드 : 활성 시트에서 주석 표시기 색상 변경

Sub CoverCommentIndicator()
'Update 20141110
Dim pWs As Worksheet
Dim pComment As Comment
Dim pRng As Range
Dim pShape As Shape
Set pWs = Application.ActiveSheet
wShp = 6
hShp = 4
For Each pComment In pWs.Comments
  Set pRng = pComment.Parent
  Set pShape = pWs.Shapes.AddShape(msoShapeRightTriangle, pRng.Offset(0, 1).Left - wShp, pRng.Top, wShp, hShp)
  With pShape
    .Flip msoFlipVertical
    .Flip msoFlipHorizontal
    .Fill.ForeColor.SchemeColor = 12
    .Fill.Visible = msoTrue
    .Fill.Solid
    .Line.Visible = msoFalse
  End With
Next
End Sub

4. 코드를 붙여 넣은 후 F5 키를 눌러 코드를 실행하고 모든 빨간색 삼각형 표시기는 다음 스크린 샷과 같이 파란색 삼각형으로 덮여 있습니다.

doc-change-comment-indicators-1
-1
doc-change-comment-indicators-2

배송 시 요청 사항:

1. 위의 코드에서 스크립트의 색상 인덱스를 변경하여 파란색을 원하는대로 변경할 수 있습니다. .Fill.ForeColor.SchemeColor = 12.

2. 위 VBA에서 추가 한 삼각형 모양은 셀 크기를 조정할 때 크기가 변경됩니다.

3. 색상이있는 모든 삼각형 모양을 즉시 제거하려면 다음 VBA 코드를 사용하면됩니다.

VBA 코드 : 주석 표시기에서 삼각형 모양 제거

Sub RemoveIndicatorShapes()
'Update 20141110
Dim pWs As Worksheet
Dim pShape As Shape
Set pWs = Application.ActiveSheet
For Each pShape In pWs.Shapes
    If Not pShape.TopLeftCell.Comment Is Nothing Then
      If pShape.AutoShapeType = msoShapeRightTriangle Then
        pShape.Delete
      End If
    End If
Next
End Sub

관련 기사 :

Excel에서 주석으로 모든 셀을 강조 표시하는 방법은 무엇입니까?

Excel에서 모든 주석 및 주석 표시기를 표시하거나 숨기는 방법은 무엇입니까?

최고의 사무 생산성 도구

🤖 Kutools AI 보좌관: 다음을 기반으로 데이터 분석을 혁신합니다. 지능형 실행   |  코드 생성  |  사용자 정의 수식 만들기  |  데이터 분석 및 차트 생성  |  Kutools 기능 호출...
인기 기능: 중복 항목 찾기, 강조 표시 또는 식별   |  빈 행 삭제   |  데이터 손실 없이 열이나 셀 결합   |   수식없이 반올림 ...
슈퍼 조회: 다중 기준 VLookup    다중 값 VLookup  |   여러 시트에 걸친 VLookup   |   퍼지 조회 ....
고급 드롭다운 목록: 드롭다운 목록을 빠르게 생성   |  종속 드롭다운 목록   |  다중 선택 드롭 다운 목록 ....
열 관리자: 특정 개수의 열 추가  |  열 이동  |  Toggle 숨겨진 열의 가시성 상태  |  범위 및 열 비교 ...
특색 지어진 특징: 그리드 포커스   |  디자인보기   |   큰 수식 바    통합 문서 및 시트 관리자   |  리소스 라이브러리 (자동 텍스트)   |  날짜 선택기   |  워크 시트 결합   |  셀 암호화/해독    목록으로 이메일 보내기   |  슈퍼 필터   |   특수 필터 (굵게/기울임꼴/취소선 필터링...) ...
상위 15개 도구 세트12 본문 도구 (텍스트 추가, 문자 제거,...)   |   50+ 거래차트 유형 (Gantt 차트,...)   |   40+ 실용 방식 (생일을 기준으로 나이 계산,...)   |   19 삽입 도구 (QR 코드 삽입, 경로에서 그림 삽입,...)   |   12 매출 상승 도구 (숫자를 단어로, 환율,...)   |   7 병합 및 분할 도구 (고급 결합 행, 셀 분할,...)   |   ... 그리고 더

Excel용 Kutools로 Excel 기술을 강화하고 이전과는 전혀 다른 효율성을 경험해 보세요. Excel용 Kutools는 생산성을 높이고 시간을 절약하기 위해 300개 이상의 고급 기능을 제공합니다.  가장 필요한 기능을 얻으려면 여기를 클릭하십시오...

상품 설명


Office Tab은 Office에 탭 인터페이스를 제공하여 작업을 훨씬 쉽게 만듭니다.

  • Word, Excel, PowerPoint에서 탭 편집 및 읽기 사용, Publisher, Access, Visio 및 Project.
  • 새 창이 아닌 동일한 창의 새 탭에서 여러 문서를 열고 만듭니다.
  • 생산성을 50% 높이고 매일 수백 번의 마우스 클릭을 줄입니다!
Comments (4)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
so useful, thanks...
This comment was minimized by the moderator on the site
tried the above to change the colour of the comment indicator but no luck? When selecting F5 to execute the code nothing happens? Help please, thansk
This comment was minimized by the moderator on the site
Bonjour peut on faire la meme chose sous condition (ex : si le commentaire contient un mot)?
This comment was minimized by the moderator on the site
Thanks for the idea!! Because I'm working in a VBA/macro free environment (security constraints), I just created a tiny little triangle shape and put it on top of all the bright red indicators, setting the properties to move but don't size with cells. Worked like a charm :-)
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations