With .Rows(3).Interior
        .ColorIndex = 39
        .Pattern = 18
        .PatternColorIndex = -4105
    End With

39为紫色
25为灰蓝色

号码 对应的 颜色  有全的吗？发上来看看？谢谢