Bagaimana cara menerapkan gradien warna di beberapa sel?

Di Excel, kita dapat dengan mudah mengisi warna latar belakang ke sel atau beberapa sel, tetapi, terkadang, kita membutuhkan warna yang diisi gradien seperti gambar berikut yang ditampilkan, bagaimana bisa mendapatkan gradien warna dalam sel atau di beberapa sel di Excel?

Gradien warna ke satu sel

Gradien warna ke beberapa sel

Terapkan warna gradien ke satu sel dengan fitur Format Cells

Terapkan warna gradien di beberapa sel dengan kode VBA

Terapkan warna gradien ke satu sel dengan fitur Format Cells

Di Excel, fitur Format Cells dapat membantu Anda untuk mengisi gradien warna dalam satu sel, lakukan hal berikut:

1. Pilih satu atau beberapa sel yang ingin Anda isi dengan gradien warna setiap sel, lalu klik kanan untuk memilih Format Cells dari menu konteks, di Format Cells kotak dialog, di bawah Mengisi tab, silakan klik Efek Isi tombol, lihat tangkapan layar:

2. di Efek Isi dialog, pilih dua warna yang ingin Anda gunakan dari dua daftar drop-down Warna bagian, lalu pilih satu gaya bayangan yang Anda suka, seperti horizontal, vertikal, dan seterusnya. Lihat tangkapan layar:

3. Lalu klik OK > OK untuk menutup dialog, dan warna gradien diisi untuk setiap sel seperti gambar berikut yang ditampilkan:

Buka kunci Excel Magic dengan Kutools AI

• Eksekusi Cerdas: Melakukan operasi sel, menganalisis data, dan membuat bagan—semuanya didorong oleh perintah sederhana.
• Formula Khusus: Hasilkan formula yang disesuaikan untuk menyederhanakan alur kerja Anda.
• Pengkodean VBA: Menulis dan mengimplementasikan kode VBA dengan mudah.
• Interpretasi Rumus: Memahami rumus kompleks dengan mudah.
• Terjemahan Teks: Hilangkan hambatan bahasa dalam spreadsheet Anda.

Tingkatkan kemampuan Excel Anda dengan alat yang didukung AI. Unduh Sekarang dan rasakan efisiensi yang belum pernah ada sebelumnya!

Terapkan warna gradien di beberapa sel dengan kode VBA

Metode di atas dapat membantu kita mewarnai gradien dalam sel individu, jika Anda perlu membuat bayangan gradien warna di beberapa sel, Anda perlu menerapkan kode VBA untuk menyelesaikannya.

1. Pertama, isi warna latar belakang tertentu ke berbagai sel.

2. Tahan ALT + F11 kunci untuk membuka Microsoft Visual Basic untuk Aplikasi jendela.

3. Klik Menyisipkan > Modul, dan tempel kode berikut di Modul Jendela.

Kode VBA: Terapkan warna gradien di beberapa sel:

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. Lalu tekan F5 untuk menjalankan kode ini, dan kotak prompt muncul untuk mengingatkan Anda memilih sel berwarna yang ingin Anda isi warna gradien, lihat tangkapan layar:

5. Dan kemudian klik OK tombol, warna dalam beberapa sel telah ditampilkan sebagai warna gradien, lihat tangkapan layar: