EXCEL宏批量处理表格技巧

1、学生数据表，总共28张表格，每张表的表格宽度不一， 格式不同，如果需要整理成统一格式， 需要花费大量时间。为了快速解决这个问题， 我编写了一个表格批量处理的宏，在表格内执行宏，可以自动对数据表进行格式调整，快速解决问题。如果有特殊的功能需求，编程难度比较大，大家也可以通过宏录制的方式去实现。批处理前的数据表:图1每张表格的格式都不一致，部分数据也因为格式问题无法正常显示12T*扑IBS1神.:户s. gvnvniiHivnilHi、0仲如岫用件H洋F!狗“riaFn7riiFn?m0220纶LTtHSEI曲聚糠具欢1fflM-Cd-02wo. a狗3.$vn?ri?riipn7rii。四WTM

2、gg 京.具IMG-L-L-IJLW.QFia?H7ri37r37TI3Fi37n?Fi?pn?ri3022fl：LTMg许.反目弱初9.Eh_曲220舞L 1Mg讦E菱S-igTW-mWo.u-kna.gri?9n9Fi39n?nai。迥颂1Mg同悄军程kuS. EFWFmEESit02M3t-L-3Cb：iMits担ujM-t-7-n会心.gSj23.fi&S0盟0舞LTMK5帷吉归lK3-3&-dWo.B-55iZs?l37n7FI39F37H33OKCSOI-JCIOMtt舆pMja.g?i3?ra?Fi?F7?E,i9p1OE2!K-L-lClij2?IDfiHUTE

3、顷江9S：iS3.63OESKL-luluSliK5-Lfl-12，i&10.aS：iJ3. MJ0H0NJM0it4-9E - *LUd她挡段条灰1涵七极 5 闻更百心丑n-H与1H t卒福剑成A主蜘妇曾鼠 机电也#位农_祖吧呻g _可咿哄tl_gn：的UM3 J _ ID咬二图2每个EXCE吹件内至少有14张学生数据表，数据内容格式不一cDEFGHIJKLn2013姓君，届 F性别!接技7民放出生年F-，专业女k学时n*挡生双i i毕业时CiCi , ,正书获:毕业证 j取率统l!(IWl!(IW甘表准证建瓮注 ，于海端男1934-1-25010.92013.S S20130501

4、王家愿男汉族1995-19!010.912013-6201305023_海1996=10-5)010.0013.6 620130503阎君蜀1S9B-1-11010.9013.620130504张旭男1994-7-LED1Q.912013,620130505李群坂族1995-3-26mo. 912013.620130506扬佳克晚审榔排 gmo. 9013.620130507周宏林19S5-2-231010.0013.620130506姜林男1995-3-16J010.312013.52O13Q5Q9坂族010,9gOlS.620130510战氐帅男1994-4-24J010.9013.620

5、1305LI史1995-2-23010.912013.620130512郭扬男199 5-L 15S01QW12013.02O1305L3房顷汉族1996-1-5)010.9gois.a20130514吕奢宣勇010.9W3.6网130ELB刘东男甘苗a#。毒。010.012013.630130516陈洁男涕1991-7-1)010.91201X530130517翟冬宇汉族1393-11-8也1Q.92013-620130518图3数据很杂乱，“出生年月”栏数据格式不统一，且因为列宽问题导致部分数据无法正常 显示这几天整理示范校资料，老师从学校的系统内导出两个EXCE以件，每个文件有14张预7

6、所邙业整哇攻吐同获版率沼订如顶虹.出与F而同JH曜耳OL阪兄mi.a j.immffMHWIIII餐心；帅*就L9uvtnrHnMtnii函7上二rF* 批uww&m.fin EiattinifEniii抑 R 品:THHf . iWW收3msRwjwrMiina批量处理后效果:如13届“焊接技术应用”专业学生双证书获取率统计表入学笙号姓艺性罪民族出牛却月KKiiPfQ华独时间毕业证号技能证书崟导S S市 30320 201 101601g_汉族19&4-0L-25由13.620130501302202-101602王蜜健1996-0715hoif.9013.620133502

7、302201-101003B艺虹1四驮1AQ5场LI 9S01505O3:3弟i-ijF-n-o-.：01X62O130KM30230201-101605张质和1盼5-CE-0S危皿g为13.61L6r30220301-101606馨如199407-13013-J2013050530230201-101WT季文哲1995-05-26M皿92013,62B13O5W0230201-101609祝旌1996-11-23伽以泌1M201305073u2O2Ol-lO10：g1995-0-232013,620玲。汹,30230301-101610香宝辰里19P5-03-16氛戚g如3.6201305(

8、30220201-10161119&4-1O-15%皿93313.63Diai5L0r30230201-101612fit庆帅汉族194-0424)10.9雄.62tJlM511r30220201-101613199&-02-23010.92013.62010512r3O2S03O1 10161415-01-15知以feois/a130513 30220331-101615汐.旅1S996-D1-0E奴gg泌13L62013051430230201-101616氐兵汉族1-10-31仙诫g由13.6冠53弟1994-123101X6201305153oasoaQi-ioiBia

9、刘东1091-11-303?13B62O1M5L6r3S 酒Wi如19凝黑1991-07-fll如9M13051?,，30230201-101633翟务宇1993-11-083310. g3Q13uS30130513图4批量处理后，批量调整每个表格的列宽，表格每一项标题居中，出生日期统一格式，达到美观大方的效果，并且表格宽度调整到一张纸内可以全部打印，在打印的时候节约纸张。、EXCE底代码说明这个宏是在office2007版本下使用VBA编程语言编写的，可以自动寻找EXCEIJC档中指 定的单元格并自动对单元格以及单元格内数据的大小、字体格式、对齐方式等属性进行调整。这个宏处理实现以下功能：1

10、、 批量调整表格列宽；2、 可以自动设置某一列数据的格式，通过进一步编程也可以实现批量设置多个数据列 格式；3、 批量设置某一行的单元格格式，如全部居中；4、 自动设置某一个单元格的格式，如单元格高度等；5、 在宏程序代码中符号“”表示注释，在“”后面的命令不会执行，可以对程序的 命令进行解释和对不需要的命令进行屏蔽。如果需要详细了解可以到微软的网站上查看EXCEL编程相关的技术文档，网址为：http:/ 表格宏程序代码：Sub EXCE掐式批量调整() EXCELS式批量调整V1.0author:项目管理部杨晖功能描述：批量处理表格格式Dim x As Integer定义整数变量，用于选定表

11、格从第一格到第12格，每个数字对应表格的字母横向字母，如“T对应表格中“A”， “2”对应表格中“B”，依次类推，根据需要设置For x = 1 To 12设置每个表格的列宽，在数组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-ddWith Range(

12、F:F”).NumberFormatLocal = $-F800dddd, mmmm dd, yyyyEnd With设置表格A列 格式居中对齐 可以调整参数(A:A)去选定表格某一列，如果需要调整 多个列表，复制下面的代码粘贴在后面，然后修改参数即可With Range(A:A).HorizontalAlignment = xlCenter设置水平对齐方式为居中.VerticalAlignment = xlCenter设置垂直对齐方式为居中.WrapText = False.Orientation = 0.AddIndent = False.IndentLevel = 0.ShrinkToF

13、it = False.ReadingOrder = xlContextEnd With设置表格设置表格第2行格式居中对齐可以调整参数(2:2)去选定表格某一列Rows(2:2).SelectWith Selection.HorizontalAlignment = xlCenter.VerticalAlignment = xlCenter.WrapText = False.Orientation = 0.AddIndent = False.IndentLevel = 0.ShrinkToFit = False.ReadingOrder = xlContext.MergeCells = False

14、End With以下程序代码为定义具体某一个表格高度可以调整参数(”1:42”)去选定表格某一列Rows(1:42”).RowHeight = 14.25ActiveWindow.SmallScroll Down:=9Rows(”43:43”).RowHeight = 12End Sub、创建宏创建宏 1:1:在 EXCEEXCE 呻选择“视图”（步骤 1 1）- “宏”（步骤 2 2）-“查看宏”（步骤 3 3）昌件5成碧更业生名孙念寰容嗅式】-Microsoft Excel克I视匿EIQIEWAcrobat3、kJ坚昱示比例100%做到 速定区域1朝1钳暗口,*T , rH 1 .1冻适至

15、惜3二职肖隐意AWE帝 弘重设国口位登痒切插瓮口 工悍区-|亶,T0查看宠（YjEFGHIJK毕业总人数=1222人应J由与栏业王5L性别民族身份证号，入学 g毕业时1，毕冲证号职业二钟）W技能证书生与-男汉族lf011594122知1.9*2014.620140001男汉族204199&OS120H.S2014.620140002男汉族381139706022011.92014.620140003男汉族8119950126(sou.e2011,620140004里1。白武1 0071i a014足r恤创建宏 2:2:在弹出的小窗口中输入宏的名称（步骤 1 1）-点击“创建”（步骤 2

16、 2）朗除（ul:位置也：斯有打卉的工死漕TE 说明一职消龙014届布双证书”专】玮 F2014届“取证书专业中平均“取证书”获取率.H/6曰j服定名呢：EXCELfl式批量调整创建宏 3:3:在弹出的宏编辑窗口中将代码复制进去（步骤 1 1）- -然后点击“编译”（步骤 2 2）, ,这时宏自动执行程序，进行批量处理。WIWS纳格It翌中聘芥 而注F；g.L*r】Fko-1 3TiLhllU I fMAfiL BIZFLIMT= jiLCiH.qr.rtijCwL =FHI”Cbri ilLIAll 4衍IL9201.4. Gr2O3-JO LQ高筋证顷壮就件2DL1DO0D24O$3D2S

17、4.43D22D2A1-11M2&锈婷女汉4121261906157128Qll.9014.Hr20140111中翅鬲斯延也公靠件）2019000024003合格?0.2P3nKflMll-Lt126文4k210t213 99511304828知1L0WLLE如】如】LW中迂高音证源船】2DL9DQOD24Qf3llEai-bnnA 1 1 rtjHT n4r-JBrtl-ME-= n f i-i. _AJ ju j, . 44*U.J TmiwHMIWJJtm EWNAL.KL场Sll (KB)n A据郴B tuyi *AHiMSTKL-ff=llW gH-_ a回虹、d月咛T|II

18、我S J? 3?帕行 4 别1-畔5LT W5kt+ifljshHia (_ Tluifultd +CjflUa-翌, Mi rr-nifl-FM裸职I嚓Flfcff“t *r -(FEIADUL ILEI-iiEXEII时也z01* *c Eni|.rir * SRI3rfl.用于逸页裹花W/河JiL浅s UF尊早网田EWfT藤侵手U . JfiTL嬲 E尊Hf -*2驾国费8*HE r IHMKSJB GSmSG 小 w 岫状fj S3. 135.r. tfa.5 a 5HL15 15. 7 HL ? K_ 5.735-康51 l. 4 1. 5)(i = 0PU丽F列ffFW格MA* mr-况FiLk.HtVrFwiU!d = AEd“以EaiTiWt!m任利屏|gy I阿31土IM号W三、直接使用宏宏参数测试成功之后，只要在“宏”对话框中选中需要的宏（步骤1 1）,直接点击“运行”即可（步骤 2 2）, ,四、宏安全设置1 1、从安全机制考虑，officeoffice 办公软件有时候会禁用我们自己编写的宏代码，导致宏无