vba 判断合并单元格的内容

比如我第一列,a1到a4,都被合并成同一个格子,我用for语句和if语句进行判断这个格子是否有内容,目标是:如果有内容,那么不隐藏,如果无内容,那么隐藏除了a4以外的格子... 比如我第一列,a1到a4,都被合并成同一个格子,我用for 语句和if 语句进行判断这个格子是否有内容,目标是:如果有内容,那么不隐藏,如果无内容,那么隐藏除了a4以外的格子。
代码就是if cell()=0之类,然后隐藏=true或者false之类的,执行是不报错的。
然后我在格子里面输入1,按道理应该全部都显示,但是实际程序只能判定a1格子有内容,然后把后面的a2和a3当成没内容的给隐藏了,怎么解决合并单元格判定内容的问题呢
展开
 我来答
柔软的Bp
科技发烧友

2018-01-23 · 智能家居/数码/手机/智能家电产品都懂点
知道大有可为答主
回答量:3万
采纳率:66%
帮助的人:9033万
展开全部
试下,A列有合并单元格,且有数据的,不隐藏
Sub 隐藏空行()
Dim I%
For I = 1 To Range("A65536").End(xlUp).Row
If Cells(I, "a").MergeCells = False And Cells(I, "a") = "" Then
Cells(I, "a").Select
Selection.EntireRow.Hidden = True
End If
Next
End Sub
帐号已注销
2018-01-17 · TA获得超过1663个赞
知道小有建树答主
回答量:6318
采纳率:30%
帮助的人:934万
展开全部
给你个提示
红包!
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
Ynzsvt
2018-01-17 · TA获得超过6665个赞
知道大有可为答主
回答量:1.5万
采纳率:40%
帮助的人:2701万
展开全部
给你个提示:Rng.MergeArea(1).Address
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
收起 1条折叠回答
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式