Excel-如何创建公式以将单元格返回到另一个公式的结果右侧

Question

基本上，我在一个单元格中有以下公式，以返回行中的第一个非0值：

=INDEX('Financials Cashflow Year'!C30:M30,MATCH(TRUE,INDEX('Financials Cashflow Year'!C30:M30<>0,),0))

我想要一个公式来返回第一个公式选择的那个单元格右边的单元格的值。

假设我们有第一张工作表：

0 0 0 4 3 2

表格2我希望看到这些公式。 可扩展的东西。

4 3 2

Answer 1

我认为您需要一个数组公式。 代替匹配，使用SMALL函数获取所需的物品，如下所示：

={INDEX('Financials Cashflow Year'!$C30:$M30,1,SMALL(IF('Financials Cashflow Year'!$C30:$M30>0,COLUMN('Financials Cashflow Year'!$C30:$M30)),2)-2)}

IF函数获取一个列号数组，其中行的值大于零。

然后，Small函数的2参数将带回第二个最左列的单元格值（该值不为零）。

即在上面的示例中，它将带回3，类似地，如果将参数更改为1，它将带回4。

If语句获取索引中大于零的值的列号。

注意 ：打组合键Ctrl + Shfit + Enter提交而不是直接输入Note2 ：我注意到您正在跨行工作，因此我认为您需要在“小”之前加上“，1”

Answer 2

=INDEX(C30:M30,MATCH(TRUE,INDEX(C30:M30<>0,),0)+1)

会在第一个公式的右边为您提供第一个单元格的值，但是由于您似乎在寻找更具动态性的内容，因此对于第一个公式右边的第二个单元格来说，这样做的效果难以置信公式，您需要这样做：

=INDEX(C30:M30,MATCH(TRUE,INDEX(C30:M30<>0,),0)+2)

抓住所示公式右边的所有单元格的最佳选择是转置和过滤或使用VBA，例如VBA：

Sub toRightOfZeros()

    Dim rng, cell As Range
    Dim startCellCol, destCellLocX As Integer
    Dim ValsArr() As String
    Dim wb As Workbook
    Dim foundNotZero As Boolean

    Set wb = ThisWorkbook
    destCellLocX = 1
    foundNotZero = False

    With wb.Sheets("Sheet1")
        Set rng = .Range(.Cells(30, 3), .Cells(30, 13))
    End With

    For Each cell In rng
        If foundNotZero = False Then
            If Not cell.Value = 0 Then
                foundNotZero = True
                startCellCol = cell.Column
                Exit For
            End If
        End If
    Next

    With wb.Sheets("Sheet1")
        Set rng = .Range(.Cells(30, startCellCol), .Cells(30, 13))
    End With

    For Each cell In rng
        With wb.Sheets("Sheet2")
            .Cells(1, destCellLocX).Value = cell.Value
        End With
        destCellLocX = destCellLocX + 1
    Next

End Sub

输入（在C30：M30中）： 0 0 0 0 365 788 940 239 12 0 99

输出（第2页）： 365 788 940 239 12 0 99