Question

我的表格中有一列A，如下所示：

line 1: hello
line 2: hello
line 3:
line 4: hello
line 5: 
line 6: hello
line 7: 
line 8: hello
line 9: hello

我想有一个函数返回特定行，即从特定行开始的第一个空单元格的行。

例如：

如果我指定第1行，我想获得第3行如果我指定第6行，我想获得第7行

提前感谢您的帮助

Answer 1

这个怎么样？（假设您的数据在A列中）

Function GetNextEmptyCell(sht as worksheet, rw As Long) As Long
    With sht //Change sheet to suit your needs
        GetNextEmptyCell = IIf(IsEmpty(.Range("A" & rw).Offset(1, 0)), rw + 1, .Range("A" & rw).End(xlDown).Row + 1)
    End With
End Function

Sub Test()
    Debug.Print GetNextEmptyCell(1) // prints 3
    Debug.Print GetNextEmptyCell(4) // prints 5
End Sub

找到从特定行开始的第一个空行

1 个答案: