请教运算符比较的问题

mohao

If app.Range("a" & k) = "" Or app.Range("a" & k) = 0 Then
这句提示 k As integer，没有为类型"Range" 和"String"定义运算符 = 。请使用"ls"运算符比较两个引用的类型
不会解决，请教老师怎么解决



Private Sub Button204_Click(sender As Object, e As RibbonControlEventArgs) Handles Button204.Click
        Dim app As Excel.Application = Globals.ThisAddIn.Application
     
        For k = app.Range("a1000").End(3).Row To 2 Step -1
            If app.Range("a" & k) = "" Or app.Range("a" & k) = 0 Then
                app.Range("a" & k).Delete()
            End If
        Next k

    End Sub

临沂-枸杞

补上属性 .value  不然就是拿range对象和字符串比较了

mohao

临沂-枸杞 发表于 2022-8-11 16:25
补上属性 .value  不然就是拿range对象和字符串比较了

是这样补属性 .value吗？

临沂-枸杞

是这样补
这次的报错是字符串和数值0比较的原因

mohao

临沂-枸杞 发表于 2022-8-12 16:00
是这样补
这次的报错是字符串和数值0比较的原因

这次的报错是字符串和数值0比较的原因
这个应该怎么解决呢？
“”这个空格的写法应该怎么用另一个写法？
app.Range("a" & k) = ""