Question

嗨，目前我有一个代码，允许我在excel中插入特定日期的行。但是现在我需要一个代码，允许我在一个空单元格的列中插入特定日期。我到目前为止的代码是：

 Sub Update()

    For Each cell In Range("B2:B318")
        cell.Value = "9 / 4 / 2015"

    Next

End Sub

我不确定是否进行必要的更改以允许代码从第2行到第318行查看B列，并在找到的任何空单元格中插入特定日期。我希望有人能帮助我。非常感激。谢谢。

Answer 1

测试每个细胞：

  Sub Update()

    For Each cell In Range("B2:B318")
      If cell.Value = "" Then
        cell.Value = "9 / 4 / 2015"
      End If
    Next

End Sub

在列中找到空单元格时插入日期

1 个答案: