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:

  1. Premere Ctrl + H per visualizzare la scheda Sostituisci della finestra di dialogo Trova e sostituisci.

  2. Espandere la finestra di dialogo facendo clic sul pulsante Opzioni. (Vedi figura 1.)

  3. Fare clic sul pulsante Formato sul lato destro della casella Trova. Excel visualizza la finestra di dialogo Trova formato.

  4. Assicurati che la scheda Riempi sia selezionata. (Vedi figura 2.)

  5. Utilizzare i controlli nella finestra di dialogo per specificare il colore di sfondo che si desidera sostituire.

  6. Fare clic su OK.

  7. Fare clic sul pulsante Formato sul lato destro della casella Sostituisci con.

Excel visualizza la finestra di dialogo Sostituisci formato.

  1. Assicurati che la scheda Riempi sia selezionata.

  2. Utilizzare i controlli nella finestra di dialogo per specificare il colore di sfondo utilizzato durante la modifica delle celle.

  3. Fare clic su OK.

  4. 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: