批量设置word中表格的高度

您所在的位置:网站首页 word怎样改变表格行高 批量设置word中表格的高度

批量设置word中表格的高度

2024-07-17 07:29:45| 来源: 网络整理| 查看: 265

最近写文档的时候,遇到了一个小问题。我们的文档,大部分都是通过EA生成的,而通过EA生成的文档,好多表格格式不是很美观。不是表格的高度不合适,就是字体显示不尽人意,这些都必须去修改。当浏览了一遍文档后,发现有好几十个表格,这要是一一修改的话,那一上午就甭干别的了,光做重复工作了。记得有这么一句话:如果同一件事情,你重复做了三次,那么,肯定有简单的方法来避免这种无谓的重复。于是上网找了一下,果然,VBA完美解决了这个问题。下面就说说如何用VBA解决这个问题。

1、打开Word,点击视图——宏——查看宏

2、输入宏名,点击创建

3、输入如下代码

Sub test() Dim i As Table, N As Integer On Error Resume Next '忽略错误 Application.ScreenUpdating = False '关闭屏幕更新 For Each i In ActiveDocument.Tables '在表格中循环 With i For N = 1 To .Columns.Count '从第一列到最后一列 .Rows(N).Height = 111 .Columns(N).Select '单元格对齐方式为中部居中 Selection.ParagraphFormat.Alignment = wdAlignParagraphCenter Selection.Cells.VerticalAlignment = wdCellAlignVerticalCenter Next N End With Next i Application.ScreenUpdating = True End Sub

4、最后点击运行,你会发现文档中所有表格瞬间变成了你想要的效果。完成此项“浩大”的工程就是如此简单。

 

当然,对于VBA,以上功能只是冰山一角。送大家一句:只有想不到,没有做不到。



【本文地址】

公司简介

联系我们

今日新闻


点击排行

实验室常用的仪器、试剂和
说到实验室常用到的东西,主要就分为仪器、试剂和耗
不用再找了,全球10大实验
01、赛默飞世尔科技(热电)Thermo Fisher Scientif
三代水柜的量产巅峰T-72坦
作者:寞寒最近,西边闹腾挺大,本来小寞以为忙完这
通风柜跟实验室通风系统有
说到通风柜跟实验室通风,不少人都纠结二者到底是不
集消毒杀菌、烘干收纳为一
厨房是家里细菌较多的地方,潮湿的环境、没有完全密
实验室设备之全钢实验台如
全钢实验台是实验室家具中较为重要的家具之一,很多

推荐新闻


    图片新闻

    实验室药品柜的特性有哪些
    实验室药品柜是实验室家具的重要组成部分之一,主要
    小学科学实验中有哪些教学
    计算机 计算器 一般 打孔器 打气筒 仪器车 显微镜
    实验室各种仪器原理动图讲
    1.紫外分光光谱UV分析原理:吸收紫外光能量,引起分
    高中化学常见仪器及实验装
    1、可加热仪器:2、计量仪器:(1)仪器A的名称:量
    微生物操作主要设备和器具
    今天盘点一下微生物操作主要设备和器具,别嫌我啰嗦
    浅谈通风柜使用基本常识
     众所周知,通风柜功能中最主要的就是排气功能。在

    专题文章

      CopyRight 2018-2019 实验室设备网 版权所有 win10的实时保护怎么永久关闭