Excel精英培训网

 找回密码
 注册
查看: 2018|回复: 2

[无附件] 类型不匹配

[复制链接]
发表于 2020-3-13 18:39 | 显示全部楼层 |阅读模式
大神们,我写了一个最简单的代码,为什么提示类型不匹配呢?错误 13!

Sub test()
Dim i, r
r = Cells(Rows().Count(), 3).End(3).Row
i = 2
For i = 2 To r
If Cells(i, 8) = "" Then
Cells(i, 8) = Cells(i - 1, 8)
End If
Next i
End Sub
微信截图_20200313183756.png
微信截图_20200313183815.png
发表于 2020-3-13 20:40 | 显示全部楼层
本帖最后由 大灰狼1976 于 2020-3-13 20:45 编辑

点击“调试”,然后看下出错当时i变量的值。可能原因:单元格内有错误值(如#N/A、#DIV/0!等)
回复

使用道具 举报

 楼主| 发表于 2020-3-16 19:04 | 显示全部楼层
大灰狼1976 发表于 2020-3-13 20:40
点击“调试”,然后看下出错当时i变量的值。可能原因:单元格内有错误值(如#N/A、#DIV/0!等)

果然给你说中了,我还一直以为是我写错了
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

本版积分规则

小黑屋|手机版|Archiver|Excel精英培训 ( 豫ICP备11015029号 )

GMT+8, 2024-5-8 11:15 , Processed in 0.212721 second(s), 9 queries , Gzip On, Yac On.

Powered by Discuz! X3.4

Copyright © 2001-2020, Tencent Cloud.

快速回复 返回顶部 返回列表