<万博manbetx平台>关于vba在word文档中插入文字并设置相应的文字属性介绍 - 万博manbetx平台中文网

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

下面的VBA代码功能,第一步,word当前文档的上面添加文字dzwebs文字。

下面的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英寸

以上就是关于vba在word文档中插入文字并设置相应的文字属性介绍的详细内容,更多请关注万博manbetx平台中文网其它相关文章!

赞(0) 打赏
未经允许不得转载:万博manbetx平台中文网首页 » word

评论 抢沙发

  • 昵称 (必填)
  • 邮箱 (必填)
  • 网址

前端开发相关广告投放 更专业 更精准

联系我们

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

支付宝扫一扫打赏

微信扫一扫打赏