本文作者:office教程网

vba在word文档中插入文字并设置相应的文字属性

office教程网 2023-05-16 21:35:14
后台-系统设置-扩展变量-手机广告位-内容正文顶部
摘要:

下面的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)

增加word标题样式中的标题4.标题5.标题6

增加word标题样式中的标题4.标题5.标题6 在word文档中设置文字的格式,有时候需要使用word内部提供的设置好的格式,就比如设置文字的不同级别的标题,就需要使用各种标题的样式! 一般情况下,要使用标题,在格式工具栏上面,有“正文”两个字的那个下拉列表框,里面就有标题的样式,但是,如下图一样。 一般只有三级的标题样式,标题 1、标题 2和标题 3,如果但是没有标题4、标题5、标题6等等,但是万一我们要使用标题4、标题5、标题6或者更多级别的标题,应该如何设置才能使用呢,方法如下,不算难。 找到菜单“

.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英寸

Word如何插入半勾√符号

Word如何插入半勾√符号 一、使用长相类似半勾的符号 如果使用这种方法,就比较简单了。方法如下: 在Word中,找到菜单“插入”→“符号”,如下图。 弹出下面的对话框。 上图中,选择“符号”选项卡,然后,在里面找到如上图的符号,即?这个符号,将其插入到文档里面,然后,你就可以将?复制到任何地方,代替半勾来使用。 二、使用绘图的办法制作半勾 同样,在Word文档中,通过绘图工具栏,先绘制一个√符号,接着,在通过绘制直线的工具,在半勾上画一叉,最后,再将两者组合在一块,成功一个整体,就成为半勾符号了。 该组

后台-系统设置-扩展变量-手机广告位-内容正文底部
未经允许不得转载:

作者:office教程网,原文地址:vba在word文档中插入文字并设置相应的文字属性发布于2023-05-16 21:35:14
转载或复制请以超链接形式并注明出处 演示站

分享到:

觉得文章有用就打赏一下文章作者

支付宝扫一扫打赏

微信扫一扫打赏

留言与评论(共有 0 条评论)
   
验证码: