excel - 如何找到列中的第一个非空白单元格？

Question

第一行是所有标题，第一列是所有日期。我正在寻找 vba 代码/宏来查找并选择标题后每列中的第一个非空单元格。例如，在区域 B2 中找到第一个非空单元格并选择它。

Answer 1

中频您的第一行是标题行，然后您可以使用:

Columns("B").SpecialCells(xlCellTypeBlanks)(1).Select

编辑

抱歉误读了这个问题，上面的代码是完全错误的。一个解法:

注意:它们是空白和空白之间的区别。

对于第一个非空白(如问题标题)尝试:

With Columns("B")
    .Find(what:="*", after:=.Cells(1, 1), LookIn:=xlValues).Activate
End With

对于第一个非空(如问题主体)尝试:

与上面不同，这还会找到公式等于空白的非空单元格，即 =IF(A1=1,A1,"")

With Columns("B")
    .Find(what:="*", after:=.Cells(1, 1), LookIn:=xlFormulas).Activate
End With