Mikki sta cercando un modo per cambiare il colore predefinito sui commenti del foglio di lavoro in modo che possa distinguere i suoi commenti dai commenti fatti da altre persone.

Quando aggiungi un commento a una cella in un foglio di lavoro, Excel ti consente di modificare la formattazione utilizzata per quel commento. Una volta creato il commento, segui questi passaggi:

  1. Fare clic con il tasto destro sulla cella e scegliere Modifica commento dal menu contestuale.

Ciò posiziona il punto di inserimento all’interno del commento in cui è possibile digitare più informazioni, se lo si desidera.

  1. Fai clic con il pulsante destro del mouse sul bordo del commento e seleziona Formato commento dal menu contestuale risultante. Excel visualizza la finestra di dialogo Formato commento.

  2. Utilizzare i controlli nella finestra di dialogo per modificare la modalità di visualizzazione del commento.

  3. Fare clic su OK.

Questi passaggi vanno tutti bene e bene, ma interessano solo il commento corrente. Se desideri impostare un valore predefinito per i commenti che aggiungi in futuro, Excel non ricorda la formattazione e non fornisce alcun modo per modificare le impostazioni predefinite. Invece, Excel acquisisce la formattazione predefinita dei commenti da Windows stesso. È possibile modificarlo modificando le proprietà di visualizzazione per Windows, in particolare l’impostazione di visualizzazione della descrizione comando. Se lo modifichi, hai modificato il modo in cui Excel formatta i tuoi commenti. (Hai anche modificato il modo in cui le descrizioni comandi appaiono in ogni altro programma sul tuo sistema.)

Una soluzione alternativa consiste nell’usare una macro per inserire i tuoi commenti. La macro può non solo inserire il commento, ma anche formattarlo in base alle tue esigenze.

Ecco un esempio di una breve macro che inserirà un commento per la cella selezionata e, se il nome dell’utente è “Mikki”, renderà il colore di sfondo turchese. (Il nome dell’utente è definito nel setup per Excel.)

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

Se hai già un foglio di lavoro che contiene molti commenti, potresti voler cercare commenti che contengono il testo “Mikki” e quindi cambiare il colore di quei commenti. Questa macro è perfetta:

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

Capisci che la macro cambierà il colore se il testo “Mikki”

appare ovunque all’interno del testo del commento. Una leggera variazione della macro controlla l’attributo Autore del commento, e se è impostato su “Mikki”, allora apporta la modifica:

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 è la tua fonte di formazione economica su Microsoft Excel.

Questo suggerimento (12567) si applica a Microsoft Excel 2007, 2010 e 2013.