根据第一列上的行填充行

时间:2016-09-27 13:29:59

标签: excel-vba excel-formula fill vba excel

我有一个看起来像这样的数据

enter image description here

我想要一个像这样的公式/ vba

enter image description here

有什么想法吗?

我是Excel中的新手

2 个答案:

答案 0 :(得分:0)

您可以手动或使用 VBA 执行此操作。说我们有:

enter image description here

运行这个短宏:

Sub copy_down()
    Dim r As Range, rr As Range, N As Long

    N = Cells(Rows.Count, "A").End(xlUp).Row
    Set r = Range(Cells(1, "A"), Cells(N, "A")).SpecialCells(xlCellTypeBlanks)
    For Each rr In r
        rr.FillDown
    Next
End Sub

将产生:

enter image description here

注意:

  1. 没有错误检查 - 如果没有要填充的空白,您将看到错误
  2. 空的必须是真空,而不是返回空的公式
  3. 填充仅用于第一列,您必须修改它以处理其他列。

答案 1 :(得分:0)

一种可能的手动方式: 假设" name1"在单元格A2中,您可以在单元格A3中输入= $ A $ 2(例如,第一个空单元格" name1")并复制到" name2"以上的所有空单元格。

$符号将锁定对所选单元格的引用。您可以在选择要引用的单元格后手动输入$或按F4。