Excel VBA 自定义函数不能执行,怎么办
2017-01-16
深圳市新思维软件有限责任公司
深圳市新思维软件有限公司致力于为企业、组织提供专业的软件产品解决方案、软件集成,软件开发及服务。总部设于中国深圳,服务客户包括政府、公安、环保、教育、旅游、酒店、转型制造业等组织及企业。
向TA提问
关注
展开全部
Function countcolor(rng As Range)
For Each rng In Rang("A1:A10")
If rng.Interior.Color = RGB(255, 255, 0) Then
countcolor = countcolor + 1
End If
Next rng
End Function
试试行不。
For Each rng In Rang("A1:A10")
If rng.Interior.Color = RGB(255, 255, 0) Then
countcolor = countcolor + 1
End If
Next rng
End Function
试试行不。
本回答被网友采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询