WPS表格快速隐藏不使用的区域方法
发布时间:2023-06-13 12:44:56
在自动化办公中,如果希望在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文档,免去寻觅、下载之苦。另外, 由于实例中运用了“宏”,在打开该文件时要启用宏。
猜你喜欢
- 在excel使用中,有时需要求出指定日期或引用单元格中的日期的年份、月份或者天数,那么Excel如何利用Eomonth函数求出引用单元格中的
- word2010怎么设置文字横竖混排呢?很多用户对此还不是很清楚,小编这里就给大家带来有关word2010怎么设置文字横竖混排的回答,希望能
- 有时,我们可能想隐藏Excel单元格中的数据,使得他人不能随便发现这些数据。这里,介绍一个小技巧——使用自定义格式实现隐藏Excel单元格数
- WeGame是一款好用的游戏下载管理平台,可以查看用户保存在该平台上的应用信息,一些注重隐私的玩家希望能将信息隐藏,那么应该怎么操作呢?下面
- 相信好多朋友对Excel表格中数据透视表的强大功能都赞叹不已。今天咱们再来看看,如何快速实现对销售员的业绩汇总、业绩占比和业绩排名。下图中,
- Excel是一个办公很经常用到的一个办公软件,他主要用于数据的分析、查看、对比等,让数据看起来更直观,更容易对比,而有很多时候需要查找合并了
- 昨天,苹果给大家推送了iOS 14.7 Beta 2。虽然iOS 14.7 Beta 2没有重要的功能更新,只是修复了一些 Bug 和进行了
- 在Excel中当我们使用vlookup函数时会可能出现#N/A 错误,意思是 Not Applicable(不适用,即值不可用)。那么为什么
- 1、"G/通用格式"以常规的数字显示,相当于"分类"列表中的"常规"选项。代码:
- 如果需要给word文本设置字符底纹的话,我们需要选中需要设置底纹的文本后,可以通过“格式”工具栏添加默认的灰色底纹,或利用菜单命令添加其他颜
- 文档中的文字有些单调,苍白,如果想要为其做出其它的效果,最快捷的方法就是改变其颜色,比如可以插入一些艺术字的效果等等。学完本节之后,你就可以
- 由于新增加功能都通过插件的形式发布,这样选择权就交到了用户手中。用户自由选择所需功能,无论是喜欢小巧精悍的朋友,还是追求大而全的朋友,现在都
- Excel中经常需要使用到搜索功能搜索自己需要的数据,搜索数据具体该如何操作呢?下面是由小编分享的excel表格搜索数据的教程,以供大家阅读
- word文档怎么设置保存格式,怎么设置word的默认保存格式,就是第一次保存的格式的,下面小编来告诉你word设置保存格式的技巧吧,希望看完
- 小伙伴在使用win10系统中,有否遇到“系统资源不足无法完成请求的服务”这种情况。其实这有些原因无外乎就是加载程序过多导致资源不足,或者虚拟
- 选择"审阅→更改"功能区。点击"上一处"、"下一处"图标,光标则跳转到上一处或下
- Excel作为办公人员常用的软件之一,获得了世界范围的推广和使用;在Excel中插入日历来说也许对于大部分的用户比较陌生,其实我们需要通过一
- 你真的知道Excel吗?你使用Excel有多长时间了?为什么同事总是提前一步完成同样的工作?为什么我的表现不如别人?你好,我是王琦老师。我很
- 设置文件备份可以使我们在未保存到文件的时候焦头烂额。下面让小编为你带来excel2010设置备份的方法。excel2010设置备份步骤:1、
- Excel是用户工作中都需要用到的办公软件,当你遇到Excel打开全是灰色的,没有办法进行编辑,就算新建表格也是灰色的要怎么办呢?怎么才能进