Sostituzione dei colori di sfondo nelle celle (Microsoft Excel)
Jozef sta cercando un modo per cambiare i colori di sfondo di celle specifiche nel foglio di lavoro che ha creato. Ad esempio, vorrebbe trovare tutte le celle di sfondo rosse e cambiarle in blu oppure trovare tutti gli sfondi gialli e cambiarli in blu. Jozef si chiede se esiste un modo semplice per farlo.
È abbastanza ovvio che puoi modificare manualmente i colori di sfondo di qualsiasi cella, quindi non è necessario accedere a tale opzione per apportare le modifiche. Ciò di cui hai bisogno è un modo per apportare modifiche a tutte le celle contemporaneamente. Se stai usando Excel 2002 o 2003 puoi seguire questi passaggi:
-
Premere Ctrl + H per visualizzare la scheda Sostituisci della finestra di dialogo Trova e sostituisci.
-
Espandere la finestra di dialogo facendo clic sul pulsante Opzioni. (Vedi figura 1.)
-
Fare clic sul pulsante Formato sul lato destro della casella Trova. Excel visualizza la finestra di dialogo Trova formato.
-
Assicurati che la scheda Motivi sia selezionata. (Vedi figura 2.)
-
Utilizzare i controlli nella finestra di dialogo per specificare il colore di sfondo che si desidera sostituire.
-
Fare clic su OK.
-
Fare clic sul pulsante Formato sul lato destro della casella Sostituisci con.
Excel visualizza la finestra di dialogo Sostituisci formato.
-
Assicurati che la scheda Motivi sia selezionata.
-
Utilizzare i controlli nella finestra di dialogo per specificare il colore di sfondo utilizzato durante la modifica delle celle.
-
Fare clic su OK.
-
Fare clic su Sostituisci tutto.
Se stai usando una versione precedente di Excel, questi passaggi non funzioneranno.
Invece dovrai usare una macro per fare le modifiche. Quello che segue è un esempio di uno che dovrebbe funzionare. (Puoi usare questa macro anche nelle versioni successive di Excel.)
Sub ChangeColor() Dim rCell As Range If Selection.Cells.Count = 1 Then MsgBox "Select the range to be processed." Exit Sub End If For Each rCell In Selection If rCell.Interior.Color = RGB(255, 0, 0) Then 'red rCell.Interior.Color = RGB(0, 0, 255) 'blue End If Next rCell End Sub
_Nota: _
Se desideri sapere come utilizzare le macro descritte in questa pagina (o in qualsiasi altra pagina dei siti ExcelTips), ho preparato una pagina speciale che include informazioni utili.
ExcelTips è la tua fonte di formazione economica su Microsoft Excel.
Questo suggerimento (9042) si applica a Microsoft Excel 97, 2000, 2002 e 2003. Puoi trovare una versione di questo suggerimento per l’interfaccia a nastro di Excel (Excel 2007 e versioni successive) qui: