Word VBA设置所有图表宽度并居中

设置word当前文档所有图表宽度为14cm并居中

alt+f11，新建模块粘贴进去就能用

Sub ChangeChartWidthto14()Dim aktDocument As DocumentDim shp As ShapeDim oInLineSp As InlineShapeSet aktDocument = Word.ActiveDocumentWith aktDocumentFor Each shp In .Shapes'判断shape是否是图表If shp.HasChart Then'设置宽度14cmshp.Width = Application.CentimetersToPoints(14)'居中shp.Range.ParagraphFormat.Alignment = wdAlignParagraphCenterEnd IfNextFor Each oInLineSp In .InlineShapes'判断inlineshape是否是图表If oInLineSp.HasChart ThenoInLineSp.Width = Application.CentimetersToPoints(14)oInLineSp.Range.ParagraphFormat.Alignment = wdAlignParagraphCenterEnd IfNextEnd With
End Sub

Word VBA设置所有图表宽度并居中相关推荐

excel2010设置列宽为像素_vba：如何设置excel图表的宽度和高度(以像素为单位)？...
一个看似简单的问题.但是设置ChartObject的宽度和高度或它的Shape不会这样做,它们似乎只是该白色矩形的一些内部部分,即嵌入图表. ChartArea似乎也不是我感兴趣的对象. 我想要的是在 ...
枚举如何设置空白_2019-07-04 用VBA设置word中shape对象相对位置
在excelhome上看到一个提问 Excel 请教:用代码插入文本框,不随文字移动.-ExcelVBA程序开发-ExcelHome技术论坛 -club.excelhome.net 本以为可以通过录 ...
python生成的word表格设置内容居中
python生成的word表格设置内容居中 python生成的word表格设置内容内容默认左对齐,生成的表格不美观可以使用一下代码将内容居中需要导入的库 from docx.enum.table i ...
Word章节标题及图表的自动编号及引用简记（含设置完标题自动编号之后的标题格式调整）
Word标题及图表的自动编号及引用最近需要给文章排版,做一简记. Word标题的自动编号主要参考一百度文库文章: https://wenku.baidu.com/view/2557d6023c1e ...
Word VBA 常用语句
原文地址:Word VBA 常用语句作者:cathay 转帖:从n多地方google出来的......... '定制模块行为 '(1)强制对模块内所有变量进行声明 Option Explicit ...
word度量单位无效_ABBYY FineReader 12的具体使用方法和word排版设置
ABBYY FineReader 12是一款专业的OCR图文识别软件.该软件可快速方便地将扫描纸质文档.PDF文件和数码相机的图像转换成可编辑.可搜索的文本,下面我们具体的演示与讲解该软件的使用方法. ...
word怎么设置图片编号（图片下标，图片标签，图片序号，图片注释，题注）（交叉引用）
参考文章1:word怎么设置图片自动编号参考文章2:WORD教学五(论文排版之论文中的图表跟随章节插入题注) 参考文章3:题注或页码中不含章节号请使用"开始"选项卡下的" ...
vue图片宽高自适应_Echarts图标宽度变成100px，让图表宽度随着父元素自动适应，Vue实时监听宽度的变化，这可能是史上最好的解决方案！...
源码解读:当Echarts绘制图表计算宽度的时候,由于初始化图表设置为display: none,所以无法获取到clientWidth,而 parseInt(stl.width, 10)) 将widt ...
如何设置 jqplot 图表插件的标题图例和直线
好, 我想大部分朋友都已经有回到了让人痛苦的办公桌上, 给大家带来我攒好的一篇文章, 关于 jqplot 的标题, 图例和直线的设置. 本文将详细的讲解如何设置 Plot 图表的标题, 图例和序列, ...
html统计表合并单元格的快捷键,word怎样设置合并单元格快捷键
word2010中合并单元格的快捷键是什么?求解答. 合并单元格没有快捷键,不过有个f4是重复上一步操作,所以你要合并多个单元格,那么你可以先点一合并单元格,然后选定你要合并的区域. WORD合并单元 ...

Word VBA设置所有图表宽度并居中

设置word当前文档所有图表宽度为14cm并居中

Word VBA设置所有图表宽度并居中相关推荐

最新文章

热门文章