WPS表格快速隐藏不使用的区域方法

在自动化办公中,如果希望在WPS表格中只显示指定的部分区域,其余部分设置为隐藏,则需要多次使用行隐藏和列隐藏命令。作为办公高手,可以用VBA代码将选中的连续区域以外的区域一次性全部隐藏。

第一步,制作文档。

打开WPS表格 2009(在线文档公测版),新建一个空白文档,在一些区域输入数字,作为使用区域。

第二步,点击“工具”—“宏”—“创建”新宏。



第三步,在Microsoft Visual Basic 中输入或复制下列代码。

Sub HiddenSurroundRange()

Dim CelFirst As Range, CelLast As Range

If Not Selection Is Nothing Then

With Selection

'当前选中区域的第一个单元格

Set CelFirst = .Cells(1)

'当前选中区域的最后一个单元格

Set CelLast = .Cells(.Cells.Count)

End With

If CelFirst.Address <> "$A$1" Then

'蓝色区域

With Range([a1], CelFirst.Offset(IIf(CelFirst.Row = 1, 0, -1), IIf(CelFirst.Column = 1, 0, -1)))

'如果当前选中区域不包括第一行,则隐藏蓝色区域所在的行

If CelFirst.Row <> 1 Then .EntireRow.Hidden = True

'如果当前选中区域不包括第一列,则隐藏蓝色区域所在的列

If CelFirst.Column <> 1 Then .EntireColumn.Hidden = True

End With

End If

If CelLast.Address <> "$IV$65536" Then

'与上面类似处理绿色区域

With Range(CelLast.Offset(IIf(CelLast.Row = 65536, 0, 1), IIf(CelLast.Column = 256, 0, 1)),

[IV65536])

If CelLast.Row <> 65536 Then .EntireRow.Hidden = True

If CelLast.Column <> 256 Then .EntireColumn.Hidden = True

End With

End If

End If

End Sub



第四步,执行“视图—工具—控件工具箱”,单击“按钮”,选择合适的位置插入一个悬浮的“隐藏”按钮,为它指定HiddenSurroundRange宏。

第五步,选定使用区域,点击“隐藏”按钮,使用区域以外的区域一次性全部隐藏。



小提示:WPS默认安装没有VBA环境,也无法使用宏功能,若要实现教程所述功能,需要另外安装VBA,WPS office在线文档公测版可以共享文档,只要有邮箱,就可以共享VBA文档,免去寻觅、下载之苦。另外, 由于实例中运用了“宏”,在打开该文件时要启用宏。

(0)

相关推荐

  • 用金山wps表格快速生成用户名与密码的方法

    很多公司都为每一个员工提供了独立的OA系统帐号,为了方便管理,很多行政都会提前为员工设置不一样的登录用户名与密码,不过,如果员工数量大的话,要设置用户名与密码,工作量也是挺大的.今天,小编就以下面的设 ...

  • 怎样使用wps表格快速生成用户名和密码

    使用wps表格快速生成用户名和密码的方法 1.首先,新建一个工作簿,在sheet1中输入各列标题及其他信息. 2.接下来,就要来生成用户名列和密码啦!单击D2格,在英文半角状态下输入"=&q ...

  • 用WPS表格快速创建相同结构的工作表

     在实际工作中,用户有时需要创建多个结构相同的工作表,本文主要对如何利用WPS表格快速创建相同工作表进行详细地介绍。 通常情况下,创建相同结构工作表有以下几种情况: 1、在源工作表未创建的情况下,用户 ...

  • wps表格如何隐藏状态栏?

    在wps表格中隐藏状态栏的方法: 一.在电脑桌面的wps表格程序图标上双击鼠标左键,将其打开运行.如图所示; 二.在打开的wps表格窗口中,点击左上角的"文件"命令选项.如图所示; ...

  • WPS表格快速操作技巧 wps表格快捷键大全

    wps表格快捷键大全:WPS表格快速操作技巧 一.相同内容快速填充 假如A2:A100的区域需要填写的内容都是"金山表格",我们可以先选择A2:A100,输入"金山表格& ...

  • WPS表格中隐藏的行列如何取消隐藏

    今天给大家介绍一下WPS表格中隐藏的行列如何取消隐藏的具体操作步骤.1. 打开电脑,找到想要设置的WPS表格软件打开,如图将要操作的单元格选中.2. 接着选择左上角"wps表格"右 ...

  • 如何使用WPS表格快速删除表格中的重复项?

    如何使用WPS表格快速删除表格中的重复项?在使用表格文档的时候,有可能会需要用到查重功能,那么在WPS表格里面,是否可以快速查找重复项,并且快速删除重复项内容呢? 操作方法 01 第一步,打开WPS表 ...

  • WPS表格快速删除空白行

    WPS表格快速删除空白行 操作方法 01 启动WPS表格 02 打开要处理的文件 03 选择A1到C1单元格 04 ctrl+C复制 05 将复制的内容粘贴到另外的单元格中 06 在复制出的每一个单元 ...

  • WPS表格快速提取手机号后四位和中间四位的方法

    WPS表格是一款电子表格软件,它拥有直观的外观.优异的计算功能.然而,仍然有不少用户对于一些操作不太熟悉,他们问道:怎样才能通过WPS表格快速提取手机号后四位和中间四位?小编今天给大家分享解决这个问题 ...