如何快速给Excel文件减肥或者减小文件体积

近期在整理学生学籍信息时，需要按班分拣出各班学生信息，便于班主任核对正误，结果按平常的方法分完后，发现每个班级的文件竟然达到30多M，这也是第一次遇到这种情况，在网上找了下，发现提到有各处对象，或者代码太多等等，但文件里只是一些学生信息而已，哪来的图表对象等。后来转到页面视图发现整个表格都被设置为了可打印区域，就估计可能是这个原因造成，试着把所有空白页都删除后，竟然小到只20多K，看来就是这个原因，但是文件太多了（40多个），一一手动删除太慢，就写了如下的代码可以快速删除空白页，有兴趣的可以自己试试。

首先新建一个电子表格，用于存储代码。

Option Explicit
Option Base 1
Sub 瘦身代码()
Dim i As Integer

On Error Resume Next
For i = 1 To 40

Workbooks.Open "E:\文件瘦身\" & Trim(Str(i)) & ".xls" '由于每个文件都为数字，所以直接用循环数字了。这句用来打开文件
        Columns(1).SpecialCells(xlCellTypeBlanks).EntireRow.Delete '按行删除空白行
        Rows(1).SpecialCells(xlCellTypeBlanks).EntireColumn.Delete '按列删除空白行
        Workbooks(Trim(Str(i)) & ".xls").Close savechanges:=True '这句用来关闭打开的文件并保存结果
    Next i
End Sub

转载于:https://www.cnblogs.com/xiehui/archive/2012/10/25/2739319.html

如何快速给Excel文件减肥或者减小文件体积相关推荐

快速实现Excel到ODX/PDX数据文件的自动转换工具：VisualODX
在创建ODX数据库的过程中,我们需要录入大量的数据和应对多种数据格式.这不仅费时费力而且还需要更高的人力成本.并且,其错误率高,从而导致了效率低下,开发速度缓慢.基于多年的汽车行业诊断经验,Softi ...
快速实现Excel到ODX/PDX数据文件的自动转换工具：VisualODX—ODX
在创建ODX数据库过程中,我们需要录入大量的数据及应对多种数据格式,无论时间.人力成本都比较高,且错误率高,从而导致效率低下:开发速度缓慢:基于多年的汽车行业诊断经验,Softing最新开发的Visu ...
ASP程序快速生成Excel文件
ASP程序快速生成Excel文件在一个web项目中,要求将数据生成Excel文件保存到本地,最早使用的方法是直接使用Microsoft的Office Web组件,但是总体感觉是慢(微软的通病).然后 ...
python快速将excel文件转化为txt文件
在进行数据预处理的时候,我们可能习惯于将用于存储数据的其他格式的文件转换为.txt文件,因为这类文件读取.写入和处理起来都比较高效.这篇博客主要介绍一种快速地将excel文件转化为.txt文件的方法, ...
input不管用 vue_Vue自定义指令实现快速读取Excel
前几天因为业务需求,所维护的而后台中出现了大量关于上传下载Excel的操作.因为我们的后台是基于Vue,并且是在 vue-element-admin 的基础上结合实际需求开发而来.vue-elemen ...
excel导出_SpringBoot实现快速导出Excel
阅读本文约需要6分钟大家好,我是你们的导师,我每天都会在这里给大家分享一些干货内容(当然了,周末也要允许老师休息一下哈).上次老师跟大家分享了下MyBatis 几种通用的写法的相关知识,今天跟大 ...
如何使用计算机中的导出,(excel在电脑的哪个文件里？)excel怎么把查找的导出
在电脑上怎么找出excel表格在电脑上找excel表格的步骤: 1.在电到"计算机"图标,鼠标左键按钮打开计算机资源器. 2.打开之后,在右上角出现一个搜索框. 3.在搜索框中输 ...
我精心整理的 136 页 Excel 数据透视表 PDF 文件！【附获取方式】
大家好,我是 JackTian. 我的一位好朋友,也是我的一位忠实读者了,从我2018年刚开始做公众号那时,就一直关注到我到现在.累积赠送他书籍共有小 10 余本,我的这位好朋友呢,也非常的良心. 他 ...
npoi导出文件不保存在服务器,winform NPOI excel 导出并选择保存文件路径
public void ExcelOp(DataGridView gdv,ArrayList selHead) { if (selHead.Count==0) { MessageBox.Show(&q ...
你不一定知道这个用 Python 快速设置 Excel 表格边框的技巧
上一期获得赠书读者:芈小米,请尽快联系我,安排邮寄~ 本篇是呆鸟原创系列 Pandas 百问百答的第一篇,本系列的特点如下: 目标受众:Python 数据分析小白.从 Excel 处理数据转向用 P ...

如何快速给Excel文件减肥或者减小文件体积

如何快速给Excel文件减肥或者减小文件体积相关推荐

最新文章

热门文章