Excel工作簿优化技巧有哪些
发布时间:2022-12-29 11:11:43
工作表中如果存在大量的细小图形对象,那么文件体积就可能在用户毫不知情的情况下暴增,这是一种很常见的“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),单击菜单“编辑”→“清除→“格式”(或全部)。同理,也可以清除多余列的格式。
有时,用户确实需要为工作表中空白的区域预设格式,以备将来增加数据之用,但一定要使用正确的方法,否则就会造成大量用不到的区域被预设了格式,徒增文件体积。
如果需要在一行或一列的很大范围设置统一的单元格格式,可以选择整行或整列设置单元格格式,而不要只选择行列的一部分单独设置格式。前者不会造成文件体积虚增的问题,而后者会增加文件体积。试验一下在两个Excel 文件里面分别对A1∶A65536 设置单元格格式和对A∶A 设置单元格格式,目的都是为A 列设置格式,但最终文件的体积相差100 倍以上。
![](https://www.aspxhome.com/images/zang.png)
![](https://www.aspxhome.com/images/jiucuo.png)
猜你喜欢
- 有时候在word中需要根据不同的页来设置页码,比如首页、目录和其他页,应该根据其内容分段的设置页码,对于新手来说还是有一定难度,怎么办?下面
- Word软件标题自动项目符号怎么去除?很多用户在使用Word软件的时候,发现自己从其他地方复制过来的文字,在粘贴到文档里面的时候,总是会被自
- 现在,您可以完成统计表的K和L列,如下所示。统计表要完成此表,请首先在显示的单元格中输入以下公式:K5: =平均(销售)K6:
- win10实时保护怎么永久关闭?虽然可以通过直接点击关闭实时保护,但是治标不治本,每次重启后还要再关闭一次,那么有没有可以永久关闭实时保护的
- ①分页符当文本或图形等内容填满一页时,Word会插入一个自动分页符并开始新的一页。如果要在某个特定位置强制分页,可插入“手动”分页符,这样可
- WPS2013稿纸怎么设置? 1、打开 WPS2013,在最上面,点击页面设置,右边稿纸设置,如图 &n
- 如果word表格中含有复杂的数据内容,如制作工资表、销售表等表格内容时,用户常常需要对表格中的数据进行排序,从而方便对表格数据的浏览,此时则
- 我们经常会使用Win10系统自带的应用商店来下载一些应用程序,但有不少小伙伴在打开微软应用商店的时候提示错误代码0x80131500,那么碰
- 大多情况下,苹果MAC电脑很多用户都是安装双系统的,也就是保留原来的MAC系统然后加装一个Win10系统,但是有很多朋友不习惯用MAC系统习
- 1.打开Excel表格,点击需要快速输入欧元符号的单元格。2.接着按住“Alt”键,然后输入数字“0128”,输入完毕后松开“Alt”键即可
- 怎么删除Word中的空白页?Word空白页,经常使用打印机的用户都知道,空白页即便没有文字,也会被打印机识别并打印出来,被打出来的空白页遇到
- 今天的Excel教程就告诉大家一个办法,让我们设计的表格自建一个样式,方便下次的使用。具体自建操作过程如下:1、启动Excel2007,导入
- Word怎么截图?word中想要插入桌面截图,该怎么插入呢?下面我们就来看看使用word自带的截图功能截图的教程,很简单,需要的朋友可以参考
- 北京明华中学学生发展中心的小刘老师负责学校本部及相关分销的学生家长传达有关学生儿童保扣款方式更新的通知。该通知需要下发至每位学生,并请家长填
- Word2016软件记忆式键入功能的使用方法教学。在使用Word软件的时候,里面有很多的实用功能,今天和大家分享的功能叫做记忆式键入功能,使
- 在excel中,输入☑可以用控件,也可以用设置windings 2字体来设置。D列,字体设置成Wingdings 2字体后,输入R显示☑,输
- 在日常工作中我们经常会因为一些数据不能从表格中分离出来而烦恼,今天我在这里为大家介绍2个简单的公式left与right在表格中的运用,会使大
- 默认情况下,Word2010文档的文本框垂直对齐方式为顶端对齐,文本框内部左右边距为0.25厘米,上下边距为0.13厘米。这种设置符合大多数
- 在Excel中录入好数据以后经常需要用到冻结窗口这个功能,如果不需要冻结的时候就需要解除冻结窗口了,或许有的朋友并不知道冻结窗口该如何解除,
- 这篇文章主要介绍了visio 2010 简体中文版 32/64位下载安装破解教程,需要的朋友可以参考下Microsoft visio 201