Excel - Makro untuk mendapatkan kode numerik yang setara untuk warna

Makro ini memungkinkan Anda untuk mendapatkan kode warna, Anda dapat memodifikasinya untuk kenyamanan Anda:

 Sub distri_color () Dim Lign Sebagai Integer Untuk Lign = 1 Sampai 12 Lembar Kerja (1) .Range ("C" & Lign) .Nilai = Lembar Kerja (1) .Range ("B" & Lign) .Interior.Color Berikutnya Lign End Sub 
  • Ganti 12 dengan jumlah baris yang ingin Anda proses.
  • 'Ganti "C" dengan kolom yang ingin Anda gunakan untuk hasilnya (kode warna).
  • 'Ganti "B" dengan kolom yang berisi warna yang akan disaring.

Artikel Sebelumnya Artikel Berikutnya

Tips