vba在word文档中插入文字并设置相应的文字属性
发布时间：2023-12-12 23:30:41
标签：vba在word文档中插入文字并设置相应的文字属性
下面的VBA代码功能，第一步，word当前文档的上面添加文字dzwebs文字。然后，又设置第一段居中对齐，并在该段落之后添加半英寸的间距。将dzwebs的格式设为36磅，隶书字体。
Dim rngFormat As Range
Set rngFormat = ActiveDocument.Range(Start:=0, End:=0)
With rngFormat
.InsertAfter Text:="dzwebs"
.InsertParagraphAfter
With .Font
.Name = "隶书"
.Size = 36
.Bold = True
End With
End With
With ActiveDocument.Paragraphs(1)
.Alignment = wdAlignParagraphCenter
.SpaceAfter = InchesToPoints(0.5)
End With
部分代码解释：
Dim rngFormat As Range定义变量
Set rngFormat = ActiveDocument.Range(Start:=0, End:=0)设置rngFormat变量的位置，位于文档的最上面
With rngFormat
里面的代码功能是设置字体字号等属性
End With
With ActiveDocument.Paragraphs(1)
.Alignment = wdAlignParagraphCenter
.SpaceAfter = InchesToPoints(0.5)
End With
该代码代码功能是添加段后距离为0.5英寸
0
投稿猜你喜欢
macOS提供的简单乐趣之一就是启动和关闭的速度。通常只需要几秒钟，尤其是对于现代Mac电脑中的固态闪存来说。但这并不总是完美的。有时你的M- 当在使用excel输入身份证号码或者手机号码等长串的数字时，显示的是我们不理解的编码时应该怎么解决呢?下面就跟小编一起看看吧。excel输入
- 当我们在使用手机wps编辑文档的时候，如果需要对文档进行切换，那么，应该需要哪些步骤呢?下面就让小编告诉你如何使用手机wps切换文档的方法，
- Win10电脑更新完系统之后变得卡顿怎么办？我们在使用微软系统电脑的时候可以说是三天一小更五天一大更，在这期间相信许多小伙伴在更新完成后发现
- 目前越来越多人安装win10系统，但是在安装Win10系统之后，电脑屏幕出现了花屏。那么，这是怎么回事呢？经验研究发现，出现Win10系统花
- PowerPoint制作电子请帖，有需要的朋友们来学一下。 1、新建幻灯片，选择你要的版式(一般是空白)2、插入文
- 最近有用户在使用微信时，发现自己没办法加好友了，这是怎么回事呢？为什么微信无法添加好友？本文将给大家详细解答微信突然遇到无法添加好友的原因及
- win10安装完桌面没有图标？很多用户在自己安装完win10系统后发现，桌面上没有任何图标，只有一个回收站，这是win10跟win7的不同，
- 在Word 2016中，文本的输入有改写和插入两种模式。进行文档编辑时，如果需要在文档的任意位置插入新的内容，可以使用插入模式进行输入。以下
- Win8会自动启用混合启动模式(hybrid boot)，如果你使用的是双系统，那么可能将带来一些不便，下面为大家讲解下如何控制Win8的混
- VLOOKUP函数的用法是怎样的，很多伙伴应该都知道。翻译成人话：
- 要将 Mac 恢复为出厂设置，最好的方法是抹掉硬盘驱动器并重新安装 macOS。以下步骤仅适用于搭载 Intel 处理器的 Mac 电脑。抹
- 解题思路首先，hour函数提取出C2单元格的小时数8，在乘以60算出480分钟，其次，用480加上minute函数提取出C2单元格的分钟数1
- word编号2下级变为2.1我们在编辑Word文档时，我们经常用到Word文档的自动编号功能，但是Word默认的编号样式为一级编号，即编号为
- 很多用户在使用win7系统时候，想要找到win7mac地址，但是不知道该如何操作才可以查看，其实方法有很多，小编帮助大家整理了一下具体的操作
- win7/win8.1怎么才能快速获得win10升级推送？现在win10的下载量很大，所以很多电脑都没有收到win10正式版的推送，有没有办
- 折线图，在wps表格中是经常会出现的，不知道大家会不会制作，不会的话，下面就让小编告诉大家在wps表格中怎样绘制折线图。在wps表格中绘制折
- 联想笔记本电脑wlan不见了怎么办？联想笔记本没有wlan怎么回事？最近就有网友反映自己的联想笔记本电脑没有wlan选项，不知道联想笔记本上
- 屏幕有时候老自动关闭的情况想必大家都有遇到过吧，出现这种情况的原因可能是电脑主机问题也有可能是显卡问题，下面与大家分享下具体的排除及解决方法
- Win8/Win8.1用户遭遇大规模蓝屏重启事件，有用户分析，之所以出现这种现象，很可能是由于使用了第三方Windows更新程序修补漏洞所致
