Excel - แมโครเพื่อรับรหัสตัวเลขที่เทียบเท่ากับสี

มาโครนี้อนุญาตให้คุณรับรหัสสีคุณสามารถแก้ไขได้ตามความสะดวกของคุณ:

 Sub distri_color () Dim Lign เป็นจำนวนเต็มสำหรับ Lign = 1 ถึง 12 แผ่นงาน (1). ช่วง ("C" & Lign) .Value = แผ่นงาน (1) .Range ("B" & Lign). InLay ถัดไป ตำบล