☰

仅将函数应用于突出显示的单元格

tag-icon • tag-icon microsoft-excel worksheet-function
仅将函数应用于突出显示的单元格

我有一个数据列表，其中一些是突出显示的，而另一些则不是。有没有办法将函数（任何函数）仅应用于 Excel 中突出显示的单元格？我在互联网上进行了一些搜索，发现有一些方法可以使用 sumif 函数和 Vba 代码，但它们仅适用于某个函数。谢谢。

我有一个 VBA 函数，我只想将其用于突出显示的单元格。代码如下。在下面的示例中，我只想连接突出显示的单元格。

在此处输入图片描述

Function Concatenatecells(ConcatArea As Range) As String
'updateby Extendoffice 20151103
  For Each n In ConcatArea: nn = IIf(n = "", nn & "", nn & n & ","): Next
  Concatenatecells = Left(nn, Len(nn) - 1)
End Function

答案1

您需要检查内饰颜色每个细胞：

Function Concatenatecells(ConcatArea As Range) As String
    Dim n As Range, nn As String
    nn = ""
    For Each n In ConcatArea
        If n.Interior.Color <> 16777215 Then
            nn = IIf(n = "", nn & "", nn & n & ",")
        End If
    Next n

    If nn <> "" Then
        Concatenatecells = Left(nn, Len(nn) - 1)
    Else
        Concatenatecells = ""
    End If
End Function

相关内容