0
我有以下代码来隐藏定义范围内的零值的列。不知道为什么我总是得到“Next for For”错误。谁能帮忙?谢谢。宏错误 - 下一步没有对于
Sub hidecolumns1()
Dim rRange As Range
Dim rCell As Range
Set rRange = Worksheets("Income Statement - Rollover").Range("B54:KZ54").Cells
'Set rRange = Selection.Cells
For Each rCell In rRange
If rCell.Text <> "" Then
rCell.Columns.EntireColumn.Hidden = True
Next rCell
End Sub
或者你有一个换行符更多...如果rCell.Text <> “”= rCell.Columns.EntireColumn.Hidden真 – user3598756
它现在。谢谢你的帮助! –
干杯,队友!快乐的编码给你:-) – bernie