ヒント:他の言語はGoogle翻訳されています。 訪問することができます English このリンクのバージョン。
ログイン
x
or
x
x
お申し込み
x

or

Excelでコメントインジケータの色を変更する方法は?

Excelでは、コメントを挿入すると、セルの右上隅に小さい赤い三角形のインジケータが表示されます。 多くのExcelユーザーは、赤いインジケータの色を好きな色に変更できるかどうか疑問に思うかもしれません。 この記事では、この作業を終了するための回避策について説明します。

コメントインジケータの色をVBAコードで変更する


矢印青い右の泡 コメントインジケータの色をVBAコードで変更する


コメントインジケータの色をすばやく簡単に変更する方法はありませんが、次のVBAコードを使用すると、アクティブなシートに必要な特定の色で各コメントインジケータに三角形を重ねることができます。

1. コメントインジケータの色を変更するワークシートをアクティブにします。

2。 押さえつける Alt + F11 キーを押して Microsoft Visual Basic for Applicationsウィンドウ.

3に設定します。 OK をクリックします。 インセット > モジュール、次のコードを モジュールウィンドウ.

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ですべてのコメントとコメントのインジケータを表示または非表示にするにはどうすればよいですか?



Excelの推奨生産性向上ツール

Kutools for Excelを使用すると、いつでも作業を終わらせることができ、群衆から目立つようにすることができます。

  • 300作業シナリオ用に設計された1500以上の強力な高度な機能により、生産性を70%向上させ、家族の世話をしたり人生を楽しんだりするための時間を増やすことができます。
  • 数式やVBAコードを暗記する必要はもうありません。これから脳を休ませてください。
  • 3分でExcelのエキスパートになる、複雑で繰り返しのある操作が数秒で可能
  • 毎日何千ものキーボードとマウスの操作を減らし、今や職業病に別れを告げる。
  • 110,000の非常に効果的な人々と300 +世界的に有名な企業の選択。
  • 60-dayフル機能無料トライアル。 60日の返金保証。 2年間の無料アップグレードとサポート。

ブラウザのタブよりはるかに強力な、タブ付きのブラウジングと編集をMicrosoft Officeにもたらします。

  • Officeタブは、Word、Excel、PowerPoint、およびその他のOfficeアプリケーション(発行元、アクセス、Visio、およびプロジェクト)用に設計されています。
  • 新しいウィンドウではなく、同じウィンドウの新しいタブで複数のドキュメントを開いて作成します。
  • 生産性を50%向上させ、毎日数百回のマウスクリックを削減します。
Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    Sherri · 4 months ago
    Many Excel users may wonder if the red indicator color can be changed to other colors they like. In this article, I will talk about a workaround to finish this task. https://mobdro.ooo/
  • To post as a guest, your comment is unpublished.
    Kerryn · 5 months ago
    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
  • To post as a guest, your comment is unpublished.
    Dof · 1 years ago
    Bonjour peut on faire la meme chose sous condition (ex : si le commentaire contient un mot)?
  • To post as a guest, your comment is unpublished.
    Cris · 1 years ago
    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 :-)