excel宏批量处理表格技巧

《excel宏批量处理表格技巧》由会员上传分享，免费在线阅读，更多相关内容在应用文档-天天文库。

1、这几天整理示范校资料，老师从学校的系统内导出两个EXCEL文件，每个文件有14张学生数据表,总共28张表格，每张表的表格宽度不一，格式不同，如果需要整理成统一格式，需要花费大量时间。为了快速解决这个问题，我编写了一个表格批量处理的宏，在表格内执行宏，可以自动对数据表进行格式调整，快速解决问题。如果有特殊的功能需求，编程难度比较大，大家也可以通过宏录制的方式去实现。批处理前的数据表：图1每张表格的格式都不一致，部分数据也因为格式问题无法正常显示图2每个EXCEL文件内至少有14张学生数据表，数据内容格式不一图3数据很杂乱，“出生年月”栏数据格式不统一，且因为列宽问题导致部分数据无法正常显示批量

2、处理后效果：图4批量处理后，批量调整每个表格的列宽，表格每一项标题居中，出生日期统一格式，达到美观大方的效果，并且表格宽度调整到一张纸内可以全部打印，在打印的时候节约纸张。一、EXCEL宏代码说明这个宏是在office2007版本下使用VBA编程语言编写的，可以自动寻找EXCEL文档中指定的单元格并自动对单元格以及单元格内数据的大小、字体格式、对齐方式等属性进行调整。这个宏处理实现以下功能：1、批量调整表格列宽；2、可以自动设置某一列数据的格式，通过进一步编程也可以实现批量设置多个数据列格式；3、批量设置某一行的单元格格式，如全部居中；4、自动设置某一个单元格的格式，如单元格高度等；5、在宏

3、程序代码中符号“'”表示注释，在“'”后面的命令不会执行，可以对程序的命令进行解释和对不需要的命令进行屏蔽。如果需要详细了解可以到微软的网站上查看EXCEL编程相关的技术文档，网址为：http://msdn.microsoft.com/en-us/library/bb979621(v=office.12).aspx以下是EXCEL批量处理表格宏程序代码：SubEXCEL格式批量调整()''EXCEL格式批量调整V1.0'author：项目管理部杨晖'功能描述：批量处理表格格式'DimxAsInteger'定义整数变量，用于选定表格'从第一格到第12格，每个数字对应表格的字母横向字母，如“1”

4、对应表格中“A”，“2”对应表格中“B”，依次类推，根据需要设置Forx=1To12'设置每个表格的列宽，在数组Array里面设置每个表格的宽度，比如第一个数字4.38对应表格“A”列的列宽，第二个数字13.5对应表格“B”列宽，依次类推。Columns(x).ColumnWidth=Array(4.38,13.5,6.88,5.25,6.25,10.25,8.38,8.38,8.38,15.5,13,15.25)(x-1)Next'设置表格F列时间格式为yyyy-mm-ddWithRange("F:F").NumberFormatLocal="[$-F800]dddd,mmmmdd,yyy

5、y"EndWith'设置表格A列格式居中对齐可以调整参数("A:A")去选定表格某一列，如果需要调整多个列表，复制下面的代码粘贴在后面，然后修改参数即可WithRange("A:A").HorizontalAlignment=xlCenter'设置水平对齐方式为居中.VerticalAlignment=xlCenter'设置垂直对齐方式为居中.WrapText=False.Orientation=0.AddIndent=False.IndentLevel=0.ShrinkToFit=False.ReadingOrder=xlContextEndWith'设置表格设置表格第2行格式居中对齐可以

6、调整参数("2:2")去选定表格某一列Rows("2:2").SelectWithSelection.HorizontalAlignment=xlCenter.VerticalAlignment=xlCenter.WrapText=False.Orientation=0.AddIndent=False.IndentLevel=0.ShrinkToFit=False.ReadingOrder=xlContext.MergeCells=FalseEndWith'以下程序代码为定义具体某一个表格高度可以调整参数("1:42")去选定表格某一列'Rows("1:42").RowHeight=14.2

7、5'ActiveWindow.SmallScrollDown:=9'Rows("43:43").RowHeight=12EndSub二、创建宏创建宏1：在EXCEL中选择“视图”(步骤1)->“宏”（步骤2）->“查看宏”（步骤3）创建宏2：在弹出的小窗口中输入宏的名称（步骤1）->点击“创建”(步骤2)创建宏3：在弹出的宏编辑窗口中将代码复制进去（步骤1）->然后点击“编译”（步骤2），这时宏自动执行程序，