Come cambiare il colore del carattere in vba (3 metodi)

È possibile utilizzare uno dei seguenti metodi per modificare il colore del carattere in Excel utilizzando VBA:

Metodo 1: modifica il colore del carattere utilizzando i nomi dei colori VBA

 SubChangeColor ()
Range(" A1 ").Font.Color = vbRed
End Sub

Questa particolare macro cambierà il colore del carattere nella cella A1 in rosso.

Metodo 2: modifica il colore del carattere utilizzando i valori RGB

 SubChangeColor ()
Range(" A1 ").Font.Color = RGB(255,0,0)
End Sub

Questa particolare macro cambierà il colore del carattere nella cella A1 nel colore che corrisponde ai valori RGB (rosso verde blu) di (255,0,0) che risulta essere rosso.

Metodo 3: modifica il colore del carattere utilizzando i codici colore esadecimali

 SubChangeColor ()
Range(" A1 ").Font.Color = &H0000FF
End Sub

Questa particolare macro cambierà il colore del carattere nella cella A1 nel colore che corrisponde al codice colore esadecimale di #FF0000.

Nota n. 1: è necessario digitare &H davanti al codice colore esadecimale che si desidera utilizzare affinché VBA lo riconosca come codice colore esadecimale.

Nota n.2: i codici colore esadecimali sono generalmente rappresentati da sei caratteri in cui i primi due rappresentano il codice per il rosso, i due centrali rappresentano il codice per il verde e gli ultimi due rappresentano il codice per il blu.

Tuttavia, Excel scambia i primi due valori con gli ultimi due valori. Quindi, il codice colore esadecimale per il rosso è FF0000 ma dovresti invece digitare 0000FF.

Gli esempi seguenti mostrano come utilizzare ciascun metodo nella pratica.

Esempio 1: modifica del colore del carattere utilizzando i nomi dei colori VBA

Diciamo che abbiamo del testo nella cella A1 il cui colore del carattere è attualmente nero:

Possiamo creare la seguente macro per cambiare il colore del carattere nella cella A1 in rosso:

 SubChangeColor ()
Range(" A1 ").Font.Color = vbRed
End Sub

Quando eseguiamo questa macro, riceviamo il seguente output:

Nota che il colore del carattere nella cella A1 ora è rosso.

Esempio 2: modificare il colore del carattere utilizzando i valori RGB

Supponiamo di avere stringhe di testo nell’intervallo A1:A5 il cui colore del carattere è attualmente nero:

Possiamo creare la seguente macro per cambiare il colore del carattere nelle celle A1: A5 in rosso:

 SubChangeColor ()
Range(" A1:A5 ").Font.Color = RGB(255,0,0)
End Sub

Quando eseguiamo questa macro, riceviamo il seguente output:

Nota che il colore del carattere in ciascuna cella nell’intervallo A1:A5 ora è rosso.

Esempio 3: modificare il colore del carattere utilizzando codici colore esadecimali

Supponiamo ancora una volta di avere stringhe di testo nell’intervallo A1:A5 il cui colore del carattere è attualmente nero:

Possiamo creare la seguente macro per cambiare il colore del carattere nelle celle A1: A5 in rosso:

 SubChangeColor ()
Range(" A1:A5 ").Font.Color = &H0000FF
End Sub

Quando eseguiamo questa macro, riceviamo il seguente output:

Nota che il colore del carattere in ciascuna cella nell’intervallo A1:A5 ora è rosso.

Nota : è possibile trovare la documentazione completa per la proprietà VBA Font.Color qui .

Risorse addizionali

I seguenti tutorial spiegano come eseguire altre attività comuni in VBA:

VBA: come rimuovere gli spazi da una stringa
VBA: come sostituire i caratteri in una stringa
VBA: come inserire una riga con formattazione