亚洲视频二区_亚洲欧洲日本天天堂在线观看_日韩一区二区在线观看_中文字幕不卡一区

Excel中隱藏行,列的程序的vba代碼程序<!–

Code highlighting produced by Actipro CodeHighlighter (freeware)
http://www.CodeHighlighter.com/

–>Sub Macro1()
For i = 1 To 10
S1 = "B" & i
S2 = "K" & i
S3 = ":"
S4 = S1 + S3 + S2
S5 = WorksheetFunction.Count(Range(S4))
If S5 = 0 Then
Rows(i).EntireRow.Hidden = True
End If
Next i
End SubExcel中手工取消隱藏的方法手工恢復,Ctrl+a全選,"格式",行,取消隱藏Excel中取消隱藏行,列的程序的vba代碼程序<!–

Code highlighting produced by Actipro CodeHighlighter (freeware)
http://www.CodeHighlighter.com/

–>Sub Macro1()
For i = 1 To 10
Rows(i).EntireRow.Hidden = False
Next i
End Sub