1

A列有:

table
pencil
table
table
paper
pencil
paper

所以,所有包含的单元格table都应该有黄色,pencil应该有蓝色,paper应该有红色,

这个怎么做?

4

1 回答 1

2

将您的输入范围命名为“参数”

创建另一个范围“模板”,在其中列出每个元素一次并以您喜欢的方式对其进行格式化(边框、样式、背景颜色等......)

运行以下代码

Sub FormatFromList()
Dim ArgCell As Range, TemplateCell As Range

    For Each ArgCell In Range("Argument").Cells
        For Each TemplateCell In Range("Template").Cells
            If ArgCell = TemplateCell Then
                TemplateCell.Copy
                ArgCell.PasteSpecial xlPasteFormats
                Exit For
            End If
        Next TemplateCell
    Next ArgCell
End Sub

如果您想要更多自动化,请考虑使用Worksheet_Change(...)触发器来调用FormatFromList()

于 2013-09-05T10:16:39.187 回答