- word零基础教程:如何设置默认用word2003打开文档
- word文档表格制作教程:Word2013中文档折叠或展开部分内容
- 基本操作:为Word 2010编写宏 快速打印当前文档页
- wordpress教程菜鸟教程:取消Word2003自动更新功能避免样式发生变化
下面的VBA代码功能,第一步,word教程零基础教程,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变量的位置,word教程视频全集自学,位于文档的最上面
With rngFormat
里面的代码功能是设置字体字号等属性
End With
With ActiveDocument.Paragraphs(1)
.Alignment = wdAlignParagraphCenter
.SpaceAfter = InchesToPoints(0.5)
End With
该代码代码功能是添加段后距离为0.5英寸
上一篇:word简历制作教程:Word删除空行图文教程 下一篇:电脑教程word入门:vba在word文档中插入文字并设置相应的文字属性
郑重声明:本文版权归原作者所有,转载文章仅为传播更多信息之目的,如作者信息标记有误,请第一时间联系我们修改或删除,多谢。