如何用VBA一键为A列空值填入0

林木水

ck03w11 发表于 2022-3-29 09:02
谢谢老师，这个行了谢谢

举手之劳，何足挂齿。能帮到就是快乐

金樽空对月

ck03w11 发表于 2022-3-29 08:58
还是没有绕开#N/A弹出类不匹配

这样看看

1. Sub test()
   
2. Dim x%
   
3. For x = 1 To Range("a65536").End(3).Row
   
4.     If IsError(Cells(x, 1)) Then
   
5.         Cells(x, 1) = 0
   
6.     ElseIf Cells(x, 1) = "" Then
   
7.         Cells(x, 1) = 0
   
8.     End If
   
9. Next
   
10. End Sub

复制代码