Question

有没有办法找到包含特定格式的列中的最后一个单元格？

目前我在

下面使用for循环

LastRowNumber = Range("A:A").Find(What:="", after:=Range("A1"), searchdirection:=xlPrevious).Row

For i = 1 To 10000


            If Cells(LastRowNumber - i, 1).NumberFormat = "[h]:mm:ss" Then

                LastRowNumber = LastRowNumber - i

            End If


Next i

此循环找到列中的最后一个单元格，然后搜索上面的单元格以查看它是否格式为[h]:mm:ss然而这只是循环直到它失败，i = LastRowNumber有更好的方法解决这个？

Answer 1

如果您需要包含特定格式的最后一个单元格，请从列中最后一个使用的单元格开始循环：

For i = 10000 To 1 Step -1
    If Cells(i, 1).NumberFormat = "[h]:mm:ss" Then
        lastRowNumber = i
        Exit For
    End If
Next i

如果适用，请务必根据给定列中最后使用的单元格使10000成为变量 - Excel VBA- Finding the last column with data

如何找到具有特定格式

1 个答案: