excel - Visual Basic 不匹配

Question

试图确定一个单元格是否大于 0 并且我不断收到运行时错误类型不匹配，当我单击日志时，它显示此行不正确:

 If Cells(13, "U").value > 0 Then

只是试图检查该单元格是否大于 0。

Answer 1

试试这些:

加倍:

If CDbl(Cells(13, "U").value) > 0 Then

转换到长

If CLng(Cells(13, "U").value) > 0 Then

更多信息 here .

此外，为了将来引用，我相信引用包含您引用值的范围的工作表是一种很好的做法。换句话说:

Dim ws As Worksheet

Set ws = Excel.Application.ThisWorkbook.Worksheets("worksheet name here")
'or this one if working with numbers is more advantageous for you
'Set ws = Excel.Application.ThisWorkbook.Worksheets(worksheet_index)

If CDbl(ws.Cells(13, "U").Value) > 0 Then