VBA for Word设置字体的格式

以下代码为通过VBA代码来设置Word字体的各种格式。

WApp.Selection.Font.NameFarEast = "华文中宋";

WApp.Selection.Font.NameAscii = "Times New Roman";

WApp.Selection.Font.NameOther = "Times New Roman";

WApp.Selection.Font.Name = "宋体";

WApp.Selection.Font.Size = float.Parse("14");

WApp.Selection.Font.Bold = 0;

WApp.Selection.Font.Italic = 0;

WApp.Selection.Font.Underline = Microsoft.Office.Interop.Word.WdUnderline.wdUnderlineNone;

WApp.Selection.Font.UnderlineColor = Microsoft.Office.Interop.Word.WdColor.wdColorAutomatic;

WApp.Selection.Font.StrikeThrough =0;//删除线

WApp.Selection.Font.DoubleStrikeThrough = 0;//双删除线

WApp.Selection.Font.Outline =0;//空心

WApp.Selection.Font.Emboss = 0;//阳文

WApp.Selection.Font.Shadow = 0;//阴影

WApp.Selection.Font.Hidden = 0;//隐藏文字

WApp.Selection.Font.SmallCaps = 0;//小型大写字母

WApp.Selection.Font.AllCaps = 0;//全部大写字母

WApp.Selection.Font.Color = Microsoft.Office.Interop.Word.WdColor.wdColorAutomatic;

WApp.Selection.Font.Engrave = 0;//阴文

WApp.Selection.Font.Superscript = 0;//上标

WApp.Selection.Font.Subscript = 0;//下标

WApp.Selection.Font.Spacing = float.Parse("0");//字符间距

WApp.Selection.Font.Scaling = 100;//字符缩放

WApp.Selection.Font.Position = 0;//位置

WApp.Selection.Font.Kerning = float.Parse("1");//字体间距调整

WApp.Selection.Font.Animation = Microsoft.Office.Interop.Word.WdAnimation.wdAnimationNone;//文字效果

WApp.Selection.Font.DisableCharacterSpaceGrid =false;

WApp.Selection.Font.EmphasisMark = Microsoft.Office.Interop.Word.WdEmphasisMark.wdEmphasisMarkNone;

赞 (0)

相关推荐

  • word设置删除线格式应用在文档的文字中

    Word可以设置删除线格式应用在文档的文字中。 应用单删除线格式 1、用鼠标选中要设置格式的文本。 2、在“开始”-“字体”中鼠标单击“删除线”。 3、设置了删除线的文本效果如下图所示。 应用双删除线 ...

  • 在Word设置文本框格式的方法

    word是大家经常使用的文字编辑软件,具有诸多编辑功能.下面为大家介绍在Word设置文本框格式的方法 操作方法 01 添加好文本框,并在文本框内输入好了所需文字.如下图 02 将鼠标光标移动到文本框框 ...

  • Word如何用vba设置字体的格式

    以下代码为通过VBA代码来设置Word字体的各种格式. WApp.Selection.Font.NameFarEast = "华文中宋"; WApp.Selection.Font. ...

  • Word设置控件格式在哪里（word内容控件怎么编辑）

    Word设置控件格式在哪里（word内容控件怎么编辑）

    计算机办公越发普遍的今天,各种各样的信息材料都要电子档录入.如果没有统一的格式规范,输入的内容格式就会混乱不堪,不方便管理.一张小小的信息登记,填写前还要再教一遍格式规范,显然时间成本会大大增加.所以 ...

  • Excel中怎么设置字体的格式及颜色

    操作方法 01 在excel表格中可以对字体的字形.字号和颜色进行设置.下面我们就在介绍一下 02 选中要设置字体格式的单元格,如果要对整个excel表格进行设置,就选中整个表格.在下图中,我们选中的 ...

  • Word2013如何插入艺术字及字体的格式

    word2013是我们常用的一个办公软件,今天小编要跟大家讲的是如何用word2013插入艺术字以及怎样设置字体的格式,希望对大家有所帮助. 操作方法 01 首先打开word2013,然后点击插入,找 ...

  • word怎么设置字体格式?

      word怎么设置字体格式? 1.字体设置:右键字体工具栏设置文档的字体. 2.字号设置:右键字体设置中进行字号设置进行设置. 3.文字颜色选择:右键字体设置中单击字体颜色的下拉按钮进行选择. 4. ...

  • word怎么设置字体格式呢?

    文字格式有字体.字形.颜色.大小.字符间距和动态效果等.文字是文档的主要内容,字体格式的设置尤为重要.字体设置的方式较多,下面为大家word怎么设置字体格式方法,来看看吧. 步骤 1.字体设置:右键字 ...

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

    下面的VBA代码功能，第一步，word当前文档的上面添加文字dzwebs文字。然后，又设置第一段居中对齐，并在该段落之后添加半英寸的间距。将dzwebs的格式设为36磅，隶书字体。 Dim rngFo ...