Come si applica un colore a gradiente su più celle?
In Excel, possiamo facilmente riempire una cella o più celle con un colore di sfondo, ma a volte è necessario applicare un effetto gradiente, come mostrato nello screenshot seguente. Come si può ottenere un gradiente di colore in una cella o su più celle in Excel?
Applica il colore gradiente a una singola cella con la funzione Imposta formato cella
Applica il colore gradiente su più celle con codice VBA
Applica il colore gradiente a una singola cella con la funzione Imposta formato cella
In Excel, la funzione **Imposta formato cella** ti permette di applicare un gradiente di colore a una singola cella. Ecco come fare:
1. Seleziona una o più celle da riempire con un gradiente di colore (un gradiente per cella), fai clic con il tasto destro e scegli Imposta formato cella dal menu contestuale. Nella finestra di dialogo Imposta formato cella, vai alla scheda Riempimento e fai clic sul pulsante Effetti di riempimento. Vedi screenshot:
2. Nella finestra di dialogo Effetti di riempimento, seleziona due colori dai menu a discesa nella sezione Colori, quindi scegli lo stile di sfumatura che preferisci, ad esempio orizzontale, verticale e così via. Vedi screenshot:
3. Fai quindi clic su OK > OK per chiudere le finestre di dialogo. Il colore gradiente verrà applicato a ciascuna cella, come mostrato nello screenshot seguente:
Sblocca la magia di Excel con KUTOOLS AI
- Esecuzione intelligente: Esegui operazioni sulle celle, analizza i dati e crea grafici, il tutto con comandi semplici e intuitivi.
- Formule personalizzate: crea formule su misura per ottimizzare i tuoi flussi di lavoro.
- Codifica VBA: Scrivi e implementa codice VBA in modo semplice e immediato.
- Interpretazione delle formule: Comprendi con facilità anche le formule più complesse.
- Traduzione del testo: Superate le barriere linguistiche direttamente nei vostri fogli di calcolo.
Applica il colore gradiente su più celle con codice VBA
Il metodo precedente permette di applicare un gradiente all’interno di una singola cella. Per creare invece un gradiente continuo su più celle, è necessario utilizzare un codice VBA.
1. Innanzitutto, applica un colore specifico come Colore di sfondo a un intervallo di celle.
2. Tieni premuti i tasti ALT + F11 per aprire la finestra di Microsoft Visual Basic, Applications.
3. Fai clic su Inserisci > Modulo, quindi incolla il codice seguente nella finestra del Modulo.
Codice VBA: Applica il colore gradiente su più celle:
Sub colorgradientmultiplecells()
'Updateby Extendoffcie
Dim xRg As Range
Dim xTxt As String
Dim xCell As Range
Dim xColor As Long
Dim I As Long
Dim K As Long
Dim xCount As Long
On Error Resume Next
If ActiveWindow.RangeSelection.Count > 1 Then
xTxt = ActiveWindow.RangeSelection.AddressLocal
Else
xTxt = ActiveSheet.UsedRange.AddressLocal
End If
LInput:
Set xRg = Application.InputBox("please select the cells range:", "Kutools for Excel", xTxt, , , , , 8)
If xRg Is Nothing Then Exit Sub
If xRg.Areas.Count > 1 Then
MsgBox "does not support multiple selections", vbInformation, "Kutools for Excel"
GoTo LInput
End If
On Error Resume Next
Application.ScreenUpdating = False
xCount = xRg.Rows.Count
For K = 1 To xRg.Columns.Count
xColor = xRg.Cells(1, K).Interior.Color
For I = xCount To 1 Step -1
xRg.Cells(I, K).Interior.Color = xColor
xRg.Cells(I, K).Interior.TintAndShade = (xCount - (I - 1)) / xCount
Next
Next
End Sub
4. Premi quindi il tasto F5 per eseguire il codice. Si aprirà una finestra di dialogo che ti chiederà di selezionare le celle colorate a cui applicare il gradiente. Vedi screenshot:
5. Fai quindi clic sul pulsante OK. Il colore nelle celle selezionate verrà visualizzato come gradiente. Vedi screenshot:
Migliori Strumenti per la Produttività in Office
Potenzia le tue competenze in Excel con Kutools per Excel e sperimenta un’efficienza mai vista prima.Kutools per Excel offre oltre 300 funzionalità avanzate per aumentare la produttività e Risparmia tempo.Clicca qui per ottenere la funzionalità di cui hai più bisogno...
Office Tab Porta l'interfaccia a schede in Office e rende il tuo lavoro molto più semplice
- Abilita la modifica e la lettura a schede in Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
- Apri e crea più documenti in nuove schede all’interno della stessa finestra, invece che in finestre separate.
- Aumenta la tua produttività del 50 % e risparmia centinaia di clic del mouse ogni giorno!
Tutti i componenti aggiuntivi di Kutools in un unico programma di installazione.
Kutools for Office è la suite che include componenti aggiuntivi per Excel, Word, Outlook e PowerPoint, oltre a Office Tab Pro: la soluzione ideale per i team che lavorano su diverse app di Office.
- Suite completa— componenti aggiuntivi per Excel, Word, Outlook e PowerPoint + Office Tab Pro
- Un unico programma di installazione, una sola licenza— configurazione in pochi minuti (pronto per MSI)
- Funziona meglio insieme— produttività ottimizzata tra le app di Office
- Prova gratuita di 30 giorni con tutte le funzionalità— nessuna registrazione, nessuna carta di credito
- Miglior rapporto qualità-prezzo— risparmia rispetto all’acquisto dei singoli componenti aggiuntivi