Excel VBA使用样式

Question

也许是这个问题的简单解决方案。 我试图在Excel中创建VBA代码，因此它会将“好”中突出​​显示的单元从工作表A移动到工作表B.

我可以毫无问题地移动单元格，添加样式，但如果有人能指出我正确的方向，需要上面的帮助。

Answer 1

考虑：

Sub OutOfStyle()
    Dim cel As Range

    For Each cel In Sheets("Sheet1").UsedRange
        If cel.Style = "Good" Then
            cel.Copy Sheets("Sheet2").Range(cel.Address)
        End If
    Next cel
End Sub

将其改编为您自己的工作表名称。