Excel:获取行中第一个和最后一个非零单元格的位置

=MIN(IF(A1:Z1<>0, COLUMN(A1:Z1)))

=MAX(IF(A1:Z1<>0, COLUMN(A1:Z1)))

A1: 0, B1: 0, C1: 5, D1: 0, E1: 3, F1: 0, ..., Z1: 0

Function FirstNonZeroCell(rng As Range) As Long
    Dim cell As Range
    For Each cell In rng
        If cell.Value <> 0 Then
            FirstNonZeroCell = cell.Column
            Exit Function
        End If
    Next cell
    FirstNonZeroCell = -1 ' 如果没有找到非零单元格，返回 -1
End Function

Function LastNonZeroCell(rng As Range) As Long
    Dim cell As Range
    For Each cell In rng
        If cell.Value <> 0 Then
            LastNonZeroCell = cell.Column
        End If
    Next cell
    If LastNonZeroCell = 0 Then LastNonZeroCell = -1 ' 如果没有找到非零单元格，返回 -1
End Function

=FirstNonZeroCell(A1:Z1)
=LastNonZeroCell(A1:Z1)