发布网友 发布时间:2022-03-25 00:02
共1个回答
热心网友 时间:2022-03-25 01:31
出现类型错误的时候点“调试按钮”会进入代码窗口,并且*条指示错误的语句,此时可以把鼠标放在变量显示其数值,还可以按F8单行执行。
帖子的代码看来,下面的语句可能导致类型错误:
If Cells(i, y).Value = 0 Then
如果单元格Cells(i,y)的值是一个文本,例如"abc"或者" "(空格)的时候就会报错,可以先用IsNumeric判断一下来避免,修改为:
Sub 清零()
Dim i, y
For i = 2 To 500
For y = 8 To 16
If Not IsNumeric(Cells(i, y).Value) Then Cells(i, y).Value = 0
If Cells(i, y).Value = 0 Then Cells(i, y).Value = Empty
Next y
Next i
End Sub追问我是想把0值改为空单元格
追答empty是真正的空