Mikki sucht nach einer Möglichkeit, die Standardfarbe für Arbeitsblattkommentare zu ändern, damit sie ihre Kommentare von Kommentaren anderer Personen unterscheiden kann.

Wenn Sie einer Zelle in einem Arbeitsblatt einen Kommentar hinzufügen, können Sie in Excel die für diesen Kommentar verwendete Formatierung ändern. Führen Sie nach dem Erstellen des Kommentars die folgenden Schritte aus:

  1. Klicken Sie mit der rechten Maustaste auf die Zelle und wählen Sie im Kontextmenü die Option Kommentar bearbeiten.

Dadurch wird die Einfügemarke innerhalb des Kommentars platziert, wo Sie bei Bedarf weitere Informationen eingeben können.

  1. Klicken Sie mit der rechten Maustaste auf den Rand des Kommentars und wählen Sie im daraufhin angezeigten Kontextmenü die Option Kommentar formatieren. Excel zeigt das Dialogfeld Kommentar formatieren an.

  2. Verwenden Sie die Steuerelemente im Dialogfeld, um zu ändern, wie der Kommentar angezeigt werden soll.

  3. OK klicken.

Diese Schritte sind alle in Ordnung und gut, wirken sich jedoch nur auf den aktuellen Kommentar aus. Wenn Sie einen Standard für Kommentare festlegen möchten, die Sie in Zukunft hinzufügen, merkt sich Excel Ihre Formatierung nicht und bietet keine Möglichkeit, die Standardeinstellungen zu ändern. Stattdessen übernimmt Excel die Standardformatierung für Kommentare von Windows selbst. Sie können dies ändern, indem Sie die Anzeigeeigenschaften für Windows ändern, insbesondere die ToolTip-Anzeigeeinstellung. Wenn Sie dies ändern, haben Sie geändert, wie Excel Ihre Kommentare formatiert. (Sie haben auch geändert, wie QuickInfos in jedem anderen Programm auf Ihrem System angezeigt werden.)

Eine Problemumgehung besteht darin, ein Makro zum Einfügen Ihrer Kommentare zu verwenden. Das Makro kann den Kommentar nicht nur einfügen, sondern auch nach Ihren Wünschen formatieren.

Hier ist ein Beispiel für ein kurzes Makro, das einen Kommentar für die ausgewählte Zelle einfügt und, wenn der Name des Benutzers „Mikki“ lautet, die Hintergrundfarbe türkis macht. (Der Name des Benutzers wird im Setup für Excel definiert.)

Sub AddMyComment()

Dim sUserName As String     Dim  addr As String

sUserName = Application.UserName

With ActiveCell         addr = .Address

If sUserName = "Mikki" Then             ActiveSheet.Range(addr).AddComment             Range(addr).Comment.Shape.Select True             Selection.ShapeRange.Fill.ForeColor.SchemeColor = 41         Else             Range(addr).AddComment         End If     End With End Sub

Wenn Sie bereits ein Arbeitsblatt haben, das viele Kommentare enthält, möchten Sie möglicherweise nach Kommentaren suchen, in denen der Text „Mikki“ enthalten ist, und dann die Farbe dieser Kommentare ändern. Dieses Makro passt zur Rechnung:

Sub ColorMyComments1()

Dim myCom As Comment

For Each myCom In ActiveSheet.Comments     If InStr(myCom.Text, "Mikki") <> 0 Then         myCom.Shape.Fill.ForeColor.SchemeColor = 41     End If     Next myCom End Sub

Verstehen Sie, dass das Makro die Farbe ändert, wenn der Text „Mikki“

wird an einer beliebigen Stelle im Kommentartext angezeigt. Eine geringfügige Änderung des Makros überprüft das Author-Attribut des Kommentars. Wenn es auf „Mikki“ gesetzt ist, wird die folgende Änderung vorgenommen:

Sub ColorMyComments2()

Dim myCom As Comment

For Each myCom In ActiveSheet.Comments     If myCom.Author = "Mikki" Then         myCom.Shape.Fill.ForeColor.SchemeColor = 41     End If     Next myCom End Sub

ExcelTips ist Ihre Quelle für kostengünstige Microsoft Excel-Schulungen.

Dieser Tipp (12567) gilt für Microsoft Excel 2007, 2010 und 2013.