Excel电子表格事情簿优化能力有哪些
事情表中假如存在大量的细小图形工具，那么文件体积就大概在用户绝不知情的环境下暴增，这是一种很常见的“Excel 肥胖症”。可以利用下面两种方式来查抄Excel 事情表是否存在这种症状。以下是小编为您带来的关于Excel 事情簿优化能力，但愿对您有所辅佐。
1 事情表中存在大量的细小图形工具
事情表中假如存在大量的细小图形工具，那么文件体积就大概在用户绝不知情的环境下暴增，这是一种很常见的“Excel 肥胖症”。可以利用下面两种方式来查抄Excel 事情表是否存在这种症状。
(1)在事情表中按键调出“定位”对话框，单击“定位条件”按钮，在“定位条件”对话框中选择“工具”项，单击“确定”，如图1 所示。然后调查事情表上是否会显示许多被选定的工具。
假如事情簿中包括多个事情表，需要在每个事情表顶用这种方式举办查找。关于“定位”成果的更多能力，请参阅能力28。
留意：埋没列或行中的工具操作这种方式无法被看到。
(2)用VBA 对事情簿中的工具举办计数，查察在每个事情表中实际存在的工具数量，假如此数量不公道，就说明有问题。按打开VBA 编辑器窗口，抖客教程网，单击菜单“插入”→“模块”来插入一个新模块，默认环境下为“模块1”，然后在模块1 的代码窗口中输入以下代码：
Sub CountShapes()
Dim n As Double
Dim ws As Worksheet
Dim Content As String
For Each ws In Worksheets
n = ws.Shapes.Count
Content = Content & "事情表" & ws.Name & " 有" & n & " 个工具" & vbCrLf
Next
MsgBox Content
End Sub
最后，按F5 键来运行这段代码，就能看到查抄功效。在看似空缺的事情表中，存在着大量的图形工具，如图2 所示。
假如确认在事情表中存在大量的工具，而用户并不需要它们，可以用两种方式来处理惩罚：
(1)适才的定位方式中，当工具全部处于被选择状态时按键删除它们即可。
(2)利用宏在多个事情表中越发准确地删除这些无用工具。好比，可以按照需要只删除高度和宽度都小于14.25 磅(0.5 cm)的工具。
只删除勾当事情表中特定巨细的工具的代码为：
Sub DelShapes()
Dim sp As Shape, n
For Each sp In ActiveSheet.Shapes
If sp.Width < 14.25 And sp.Height < 14.25 Then
sp.Delete
n = n + 1
End If
Next sp
MsgBox "共删除了" & n & "个工具"
End Sub
删除所有事情表中的特定巨细的工具的代码为：
Sub DelAllShapes()
Dim ws As Worksheet
Dim sp As Shape
Dim n As Double
Dim Content As String
For Each ws In Worksheets
For Each sp In ws.Shapes
If sp.Width < 14.25 And sp.Height < 14.25 Then
sp.Delete
n = n + 1
End If
Next
Content = Content & "事情表" & ws.Name & " 删除了" & n & " 个工具" & vbCrLf
n = 0
Next
MsgBox Content
End Sub
这些令人迷惑的工具的发生原因大概有以下几个。从网页上复制内容后直接粘贴到事情表中，而没有利用选择性粘贴。无意中利用画图东西栏的直线东西或其他画图东西，不知不觉中在事情表中插入了小的直线或其他图形工具，由于尺寸很小，于肉眼险些无法看到。尔后，又通过单位格的复制发生了大量的小画图工具。在事情表中插入了图片或其他画图工具，操纵中又将其高度宽度设为0 或很小的值，通过复制发生了大量的工具。
在行或列的位置中插入了画图工具，工具的属性为“巨细位置随单位而变的(默认的)”，然后埋没行或列，或配置行高或列宽为很小的值，从而使插入的工具不能看到。事情表中的工具配置了不行见属性(Visible=false)，或工具的线条与填充色均设与配景致沟通，使工具无法被看到。
2 事情表中在较大的区域内配置了单位格名目可能条件名目
仔细调查事情表转动条，假如滑标很小，且拖动滑标向下到底，可以达到很大的行号或列标，但是事情表中实际利用到的区域很小，如图3 所示。这就说明，有相当大一块区域大概被配置了单位格名目可能条件名目，这些并没有被用到的单位格，能对文件体积发生很大的影响。
办理步伐如下。单击到真正需要的行号的下一行，按组合键，选择所有的多余行(也可以在名称框中输入行号如2000∶65536)，单击菜单“编辑”→“排除→“名目”(或全部)。同理，也可以排除多余列的名目。
评论列表