摘要: 近期在整理学生学籍信息时,需要按班分拣出各班学生信息,便于班主任核对正误,结果按平常的方法分完后,发现每个班级的文件竟然达到30多M,这也是第一次遇到这种情况,在网上找了下,发现提到有各处对象,或者代码太多等等,但文件里只是一些学生信息而已,哪来的图表对象等。后来转到页面视图发现整个表格都被设置为了可打印区域,就估计可能是这个原因造成,试着把所有空白页都删除后,竟然小到只20多K,看来就是这个原因,但是文件太多了(40多个),一一手动删除太慢,就写了如下的代码可以快速删除空白页,有兴趣的可以自己试试。首先新建一个电子表格,用于存储代码。Option ExplicitOption Base 1S 阅读全文
posted @ 2012-10-25 18:14 surfacetension 阅读(1666) 评论(0) 推荐(0) 编辑