Excel - 如果满足条件，则复制上面单元格的最后一个值

Question

我想用上面的最后一个值填充H列（CODIGO）上的空单元格，但仅当列B（DR）为空时才会填充，如下所示：

我必须在四个不同的电子表格中执行此操作。 1200-2000行，所以我不能一个一个地去..

Answer 1

尝试使用

Public Sub FillBlanks()
    Dim rng As Range
    Dim c As Range

    With ActiveSheet
        Set rng = .Range(.Cells(1, "H"), .Cells(.Cells(.Rows.Count, "B").End(xlUp).Row, "H"))
    End With

    For Each c In rng.SpecialCells(xlCellTypeBlanks)
        If IsEmpty(c.Offset(0, Columns("B").Column - c.Column)) Then c.Value2 = c.Offset(-1, 0).Value2
    Next c
End Sub