WPS表格怎么埋没不利用区域

　　小编教你在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文档，抖客教程网，免除寻觅、下载之苦。别的，由于实例中运用了“宏”，在打开该文件时要启用宏。