Visual Basic不匹配

时间:2018-07-26 21:09:35

标签: excel vba

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

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

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

1 个答案:

答案 0 :(得分:3)

尝试以下方法:

放大一倍:

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