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

以下代码为通过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文档怎么设置稿纸的格式

    word是我们常用的办公软件之一,有小伙伴问怎么设置稿纸的格式,下面小编介绍一下.具体如下:1. 打开要编辑钉钉word文档,点击菜单栏的[页面布局]选项2.弹出窗口选择[稿纸设置]选项,弹出对话框, ...

  • WORD文档如何设置字体及字体大小

    今天小编要和大家分享的是WORD文档如何设置字体及字体大小,希望能够帮助到大家. 操作方法 01 首先在我们的电脑桌面上新建一个word文档并点击它,如下图所示. 02 然后随便输入一些内容,如下图所 ...

  • word文字阴影怎么设置字体内部外部有阴影怎么型

    看到其它人发来的Word文档,文字有一个阴影,看起来很漂亮,这个是怎么型的呢?下面就来看一下如何设置Word文字阴影的方法吧. 操作方法 01 首先在Word编辑页面中输入要加阴影的文字 . 02 然 ...

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

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

  • Word文档中设置字体的快捷键

    经常使用word来处理文档,也经常对文档里的字体进行设置,下面我们就来看一下有哪些设置字体的快捷键. 操作方法 01 首先我们来看一个对字体加粗的快捷键,就是ctrl+B.当然你得先要选中要设置的字体 ...

  • VBA for Word设置字体的格式

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

  • Word怎么使用快捷键设置字体字号?

    今天主要介绍Word和WPS文字中的一些快捷键(改变字号.增大字号.减小字号.逐磅增大字号.逐磅减小字号) 1.打开需要编辑的Word文档 2.选中需要编辑的文字 3.改变字体 Ctrl+shift+ ...

  • word文档怎么批量修改标题格式（word怎么批量设置标题）

    word文档怎么批量修改标题格式（word怎么批量设置标题）

    在工作和学习中制作文档时,我们想把文档内标题格式设置为一样的,一个一个去设置是不是太麻烦?我们可不可以编辑完文档后,批量去设置标题的格式呢?那具体怎么操作,我们一起来学习一下Word 中如何批量设置标 ...

  • word插入公式设置字体为新罗马Times New Roman

    word里面插入公式后字体并不是论文要求的字体,我们用普通更换字体的方式都不管用.那么,word插入公式怎么设置字体为新罗马Times New Roman呢?下面让我来给大家介绍下吧,希望对大家有所帮 ...