vba 判断合并单元格的内容
比如我第一列,a1到a4,都被合并成同一个格子,我用for语句和if语句进行判断这个格子是否有内容,目标是:如果有内容,那么不隐藏,如果无内容,那么隐藏除了a4以外的格子...
比如我第一列,a1到a4,都被合并成同一个格子,我用for 语句和if 语句进行判断这个格子是否有内容,目标是:如果有内容,那么不隐藏,如果无内容,那么隐藏除了a4以外的格子。
代码就是if cell()=0之类,然后隐藏=true或者false之类的,执行是不报错的。
然后我在格子里面输入1,按道理应该全部都显示,但是实际程序只能判定a1格子有内容,然后把后面的a2和a3当成没内容的给隐藏了,怎么解决合并单元格判定内容的问题呢 展开
代码就是if cell()=0之类,然后隐藏=true或者false之类的,执行是不报错的。
然后我在格子里面输入1,按道理应该全部都显示,但是实际程序只能判定a1格子有内容,然后把后面的a2和a3当成没内容的给隐藏了,怎么解决合并单元格判定内容的问题呢 展开
3个回答
展开全部
试下,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
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
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询