excel 检查单元格是否为带有空白单元格的数字

q5iwbnjs  于 2023-06-07  发布在  其他
关注(0)|答案(1)|浏览(249)

下面是Excel表格:

我需要遍历列K,只在列K是数字的行中执行计算。
由于我有空白单元格,IsNumeric函数无法正常工作。
我尝试了下面的代码,但是IsEmpty函数对于填充的单元格返回False

Sub mysub()

    For i = 24 to lastRow
    
        If Len(Cells(i, 11)) = 0 And IsEmpty(Cells(i, 11)) = False Then
    
            'rest of the code
    
        End if
    
    Next i

End sub

我该怎么办才能解决呢?

t9aqgxwy

t9aqgxwy1#

将'Planilha1'更改为您的工作表,尝试如下操作:

Sub teste()
Dim LastRow As Long
Dim Sh As Worksheet
Dim x As Long

Set Sh = ThisWorkbook.Sheets("Planilha1")
LastRow = Sh.Cells(Rows.Count, "K").End(xlUp).Row

    For x = 1 To LastRow
        If Sh.Range("K" & x).MergeCells = False Then
            If IsNumeric(Sh.Range("K" & x).Value) Then
                Debug.Print Sh.Range("K" & x).Value
            End If
        End If
        
    Next x
End Sub

相关问题