Question

严重停留在看似简单的任务上...当我尝试使用此代码隐藏多个列时出现类型不匹配错误。

有什么更好的建议吗？

此致

Sub Hider()

        Sheets("Data Source").Columns("O:AK").Hidden = False

        Sheets("Data Source").Columns("W, V").Hidden = True

    end sub

Answer 1

试一试：

Sub Hider()

    Sheets("Data Source").Columns("O:AK").Hidden = False

    Sheets("Data Source").Range("W:W, V:V").EntireColumn.Hidden = True

end sub

Answer 2

使用

Sheets("Data Source").Columns("V:W").Hidden = True

而不是

Sheets("Data Source").Columns("W, V").Hidden = True

隐藏另一个工作表上的多个列：键入不匹配

2 个答案: