当前位置:首页经验技巧Wps经验wps表格

WPS表格如何快速隐藏不使用的区域

2024-07-03 13:39:52

  小编教你WPS表格快速隐藏不使用的区域的教程,希望对你有帮助!

  WPS表格快速隐藏不使用的区域的教程:

  第一步,制作文档。

  打开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

  f 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 IfEnd If

  End Sub

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

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

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


电脑版

免责声明:本站信息来自网络收集及网友投稿,仅供参考,如果有错误请反馈给我们更正,对文中内容的真实性和完整性本站不提供任何保证,不承但任何责任,谢谢您的合作。
版权所有:五学知识网 Copyright © 2015-2024 All Rights Reserved .