Excel~VBA控制显示隐藏指定区域

在实际工作中,我们常常需要编辑隐藏或者显示指定的 Excel 区域内容,当然我们可以手动选择然后点击对应功能按钮进行隐藏与显示,但是这样操作起来总显得有些麻烦。Excel中有一个 Range 的概念,指的是指定的单元格区域,并且 Range 可以被自定义命名,我们可以利用这一特性,通过 VBA 依次隐藏显示指定的单元格区域。

首先我们需要对需要隐藏的区域逐一命名,命名的方式就是直接选中某多个行或者列在左上角“名称框”中输入对应的名称就行,这里以“Area+‘序号’”的形式命名,方便后期遍历。命名错误的区域可以在“公式/名称管理器”下进行修改。

命名完成后进入开发工具/VBA编辑器,新建一个模块,将以下代码复制进去。

Public i As Integer, sRng As String
Sub rngIncrease()
    If i < 2 Then
        i = 2
    ElseIf i > 9 Then
        i = 9
    End If
    sRng = "Area" & i
    Range(sRng).EntireColumn.Hidden = False
    i = i + 1
End Sub
Sub rngDecrease()
    If i < 2 Then
        i = 2
    ElseIf i > 9 Then
        i = 9
    End If
    sRng = "Area" & i
    Range(sRng).EntireColumn.Hidden = True
    i = i - 1
End Sub

复制完成后回到对象窗口,插入表单控件按钮,分别绑定刚才复制进去的宏代码即可。隐藏掉需要隐藏的区域,然后通过点击“显示”与“隐藏”即可控制指定区域的显示与隐藏了。

当然,这只是一个小例子,具体的大家可以灵活运用。

蝈蝈下载面板

恭喜,此资源为免费资源,请先
注意:本站资源多为网络收集,如涉及版权问题请及时与站长联系,我们会在第一时间内与您协商解决。如非特殊说明,本站所有资源解压密码均为:blog.quietguoguo.com。
未经允许不得转载

文章标题:蝈蝈要安静 » Excel~VBA控制显示隐藏指定区域

原文链接:https://blog.quietguoguo.com/3733.html

发布信息:文章由【蝈蝈要安静】于<2019-07-31>发布于【Excel】分类下

相关标签:||

相关推荐

评论 抢沙发

  • 昵称 (必填)
  • 邮箱 (必填)
  • QQ (选填)
  • 网址(选填)