EXCEL宏批量处理表格技巧

上传人:cl****1 文档编号:498323718 上传时间:2022-08-25 格式:DOC 页数:9 大小:678KB
返回 下载 相关 举报
EXCEL宏批量处理表格技巧_第1页
第1页 / 共9页
EXCEL宏批量处理表格技巧_第2页
第2页 / 共9页
EXCEL宏批量处理表格技巧_第3页
第3页 / 共9页
EXCEL宏批量处理表格技巧_第4页
第4页 / 共9页
EXCEL宏批量处理表格技巧_第5页
第5页 / 共9页
点击查看更多>>
资源描述

《EXCEL宏批量处理表格技巧》由会员分享,可在线阅读,更多相关《EXCEL宏批量处理表格技巧(9页珍藏版)》请在金锄头文库上搜索。

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

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

3、、 在宏程序代码中符号“”表示注释,在“”后面的命令不会执行,可以对程序的命令进行解释和对不需要的命令进行屏蔽。如果需要详细了解可以到微软的网站上查看EXCEL编程相关的技术文档,网址为:http:/ 以下是EXCEL批量处理表格宏程序代码: Sub EXCEL格式批量调整() EXCEL格式批量调整 V1.0 author:项目管理部 杨晖 功能描述:批量处理表格格式 Dim x As Integer 定义整数变量,用于选定表格 从第一格到第12格,每个数字对应表格的字母横向字母,如“1”对应表格中“A”,“2”对应表格中“B”,依次类推,根据需要设置 For x = 1 To 12 设置每

4、个表格的列宽,在数组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-dd With Range(F:F) .NumberFormatLocal = $-F800dddd, mmmm dd, yyyy End With 设置表格 A列 格式居

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

6、格式居中对齐 可以调整参数(2:2)去选定表格某一列 Rows(2:2).Select With Selection .HorizontalAlignment = xlCenter .VerticalAlignment = xlCenter .WrapText = False .Orientation = 0 .AddIndent = False .IndentLevel = 0 .ShrinkToFit = False .ReadingOrder = xlContext .MergeCells = False End With 以下程序代码为定义具体某一个表格高度可以调整参数(1:42)去选

7、定表格某一列 Rows(1:42).RowHeight = 14.25 ActiveWindow.SmallScroll Down:=9Rows(43:43).RowHeight = 12 End Sub二、创建宏创建宏1:在EXCEL中选择“视图”(步骤1)-“宏”(步骤2)-“查看宏”(步骤3)创建宏2:在弹出的小窗口中输入宏的名称(步骤1)-点击“创建”(步骤2)创建宏3:在弹出的宏编辑窗口中将代码复制进去(步骤1)-然后点击“编译”(步骤2),这时宏自动执行程序,进行批量处理。创建宏4:运行完宏之后,即可看到按照预先设置的参数处理后的效果:三、直接使用宏宏参数测试成功之后,只要在“宏”对话框中选中需要的宏(步骤1),直接点击“运行”即可(步骤2),四、宏安全设置1、从安全机制考虑,office 办公软件有时候会禁用我们自己编写的宏代码,导致宏无法执行,这个可以在选项里设置,点击开始按钮(步骤1),在弹出的菜单中选中“EXCEL”选项2、在弹出的菜单中选中“信任中心”(步骤1),点击“信任中心设置”(步骤2)3、在弹出的菜单中选择“宏设置”(步骤1),点击“禁用所有宏,并发出通知”(步骤2)4、当打开EXCEL出现安全警告时,点击“选项”(步骤1),在弹出的窗口中点击“启用此内容”(步骤2),点击“确定”(步骤3)

展开阅读全文
相关资源
相关搜索

当前位置:首页 > 医学/心理学 > 基础医学

电脑版 |金锄头文库版权所有
经营许可证:蜀ICP备13022795号 | 川公网安备 51140202000112号