本文作者:office教程网

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

office教程网 2024-02-19 10:39:26
后台-系统设置-扩展变量-手机广告位-内容正文顶部
摘要: 下面的VBA代码功能,第一步,word当前文档的上面添加文字dzwebs文字。
下面的VBA代码功能,第一步,word当前文档的上面添加文字dzwebs文字。然后,又设置第一段居中对...
下面的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

  部分代码解释:

word中参考文献引用标记删除方法

报告或者论文中引用参考都是以[x]的方式(其中x为数字编号),且标记为右上标,接下来详细介绍下相应的参考文献引用要替换或删除方法,感兴趣的你可不要错过了哈,希望本文提供知识点可以帮助到你

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

word2010裁剪cad等图像操作技巧分享

office2010挺好用不爽的就是cad图形直接粘贴到word里没有了图片工具栏,造成图片周边空白过多而无法裁剪,接下来介绍下操作方法,感兴趣的朋友可以了解下

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

作者:office教程网,原文地址:关于vba在word文档中插入文字并设置相应的文字属性介绍发布于2024-02-19 10:39:26
转载或复制请以超链接形式并注明出处 演示站

分享到:

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

支付宝扫一扫打赏

微信扫一扫打赏

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