- word学习全套教程:Word2021如何插入空白页?Word2021插入空白页方法
- Word2010中插入可更新的图片链接教程
- pdf怎么转换成word:word文档下划线设置技巧,批量添加对齐,文本排版布局超轻松
- pdf怎么转换成word:第一节:Word2019从入门到精通--文档基本操作(新建、保存等)
以下代码为通过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;
,word办公软件使用教程,pdf转换成word,pdf转word,word教程网上一篇:word表格制作教程:ERROR 1045 (28000): Access denied for user root@localhost (using password: NO) 下一篇:word教程零基础教程:实用的调整WORD表格的快捷键
郑重声明:本文版权归原作者所有,转载文章仅为传播更多信息之目的,如作者信息标记有误,请第一时间联系我们修改或删除,多谢。