Excel中隐藏和恢复隐藏的行,列的vba代码程序代码

Excel中隐藏和恢复隐藏的行,列的vba代码程序代码

Excel中隐藏行,列的程序的vba代码程序

–>Sub Macro1()For i = 1 To 10S1 = "B" & iS2 = "K" & iS3 = ":"S4 = S1 + S3 + S2S5 = WorksheetFunction.Count(Range(S4))If S5 = 0 ThenRows(i).EntireRow.Hidden = TrueEnd IfNext iEnd SubExcel中手工取消隐藏的方法手工恢复,Ctrl+a全选,"格式",行,取消隐藏Excel中取消隐藏行,列的程序的vba代码程序

–>Sub Macro1()For i = 1 To 10Rows(i).EntireRow.Hidden = FalseNext iEnd Sub

版权声明：本文内容由网络用户投稿，版权归原作者所有，本站不拥有其著作权，亦不承担相应法律责任。如果您发现本站中有涉嫌抄袭或描述失实的内容，请联系我们jiasou666@gmail.com 处理，核实后本网站将在24小时内删除侵权内容。