设置文字样式

命令说明

设置已打开 Word 文档当前选中文字的样式

命令原型

Word.SetFontStyleEx(objWord,bBold,bItalic,underlineStyle)

命令参数

参数	必选	类型	默认值	说明
objWord	True	expression	objWord	Word 文档对象
bBold	True	boolean	False	文字是否为粗体，默认为false
bItalic	True	boolean	False	文字是否为斜体，默认为false
underlineStyle	True	enum	0	下划线的样式

运行实例

/*********************************设置字体样式***************************************
命令原型：
    Word.SetFontStyleEx(objWord,bBold,bItalic,underlineStyle)
入参：
    objWord--Word 文档对象
    bBold--文字是否为粗体
    bItalic--文字是否为斜体
    underlineStyle--下划线的样式 
出参:
    无
注意事项:
    需要打开word后才能使用  
*********************************************************************************/
Dim objWord
//打开Word文档
objWord = Word.Open('''C:\Users\Administrator\Desktop\标准化执行注意事项.docx''',"","",true)
//选择第3到第5行内容
Word.SelectRow(objWord,3,5)
//设置选中文字风格为粗体,斜体,单下划线
Word.SetFontStyleEx(objWord,true,true,1)

可视化样例