Question

我有以下

Table 1
name Colour
James  red
John   blue

我也有

table 2
name
James
John

我需要使用表1中使用的颜色为表2中的单元着色。所以我需要在表2中找到与表1中的名称匹配的名称，然后将其与名称关联的颜色值匹配（总是右边的值）。

任何帮助都会非常感谢。

Answer 1

E列是您姓名的开头，A列：B是名称＆amp;颜色查找。根据需要将这些更改为命名范围/不同工作表。

Sub ColourCheck()

    Dim cell As Range
    Dim cellColour As String

    For Each cell In Sheet1.Range("E1").CurrentRegion.Rows

        cellColour = Application.WorksheetFunction.VLookup(cell.Value, Sheet1.Range("A1").CurrentRegion, 2, 0)

        Select Case cellColour

            Case "red":     cell.Interior.ColorIndex = 3
            Case "blue":    cell.Interior.ColorIndex = 5

        End Select

    Next cell

End Sub

根据另一个细胞的颜色更改细胞的颜色。高强

1 个答案: