复杂的Excel“ IF-THEN”理论

Question

关于IF函数的局限性，我有一个复杂的Excel理论问题。 我有4列（3列输入值，1列输出结果）。

在这一点上，我只需要知道是否可以通过嵌套的IF函数（或IF与Match和Index的组合）来实现，或者VBA是否会更好。 我担心的是，我会整日浪费时间去尝试做一些甚至不可能的事情，或者花一整天的时间去做错误的，不切实际的事情。

Answer 1

干得好：

=MID(REPT(" & "&A$1,A2="x")&REPT(" & "&B$1,B2="x")&REPT(" & "&C$1,C2="x"),4,999)

在单元格D2中输入上述公式，然后向下复制。

注意：这是完全通用的，并使用第1行中的列标题作为输出。

Answer 2

在这种情况下，您可以使用

=IFERROR(LEFT(IF(A1="x","Col 1 & ","") & 
              IF(B1="x","Col 2 & ","") & 
              IF(C1="x","Col 3 & ",""),
              COUNTIF(A1:C1,"x")*8-3), "")

它基本上生成所有与符号的Col n字段。
然后，它计算生成的字符串（因为这里的长度都相等），并切断最后三个字符，它们将始终为&除非所有值均为- ，否则不放置任何内容（因为它将调用=LEFT("", -3)除此以外。

对于支持每列可变长度的更通用的公式，您必须手动计算每个单元格添加到输出中的长度。

Answer 3

VBA解决方案，如果您想这样做：

Function RangeResults(rng As Excel.Range) As String

Dim output As String

    For Each cell In rng.Cells
        If cell.Row = rng.Cells(1).Row Then
            output = output & IIf(UCase(cell.Value) = "X", "Col " & cell.Column & " & ", vbNullString)
        End If
    Next

    If Len(output) > 0 Then
        output = Left(output, Len(output) - 3)
    End If

    RangeResults = output

End Function

然后在col D中使用=RangeResults(A2:C2)并根据需要向下拖动