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 o trovare tutti gli sfondi gialli e cambiarle 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. Quello che devi fare è utilizzare uno strumento semplice, come lo strumento Trova e sostituisci, per apportare le modifiche al colore. Segui 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 Riempi 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 Riempi 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 ti ritrovi a dover apportare le stesse modifiche di colore più e più volte (ad esempio, cambiando sempre da rosso a blu), potresti essere interessato a utilizzare una macro per eseguire le modifiche. L’esempio seguente potrebbe essere assegnato a un tasto di scelta rapida o aggiunto alla barra di accesso rapido in modo da poterlo utilizzare rapidamente:
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 (9043) si applica a Microsoft Excel 2007, 2010, 2013, 2016, 2019 ed Excel in Office 365. Puoi trovare una versione di questo suggerimento per la vecchia interfaccia del menu di Excel qui: