可以使用Font属性来访问设置字符格式的属性和方法,也可以使用ParagraphFormat属性来访问设置段落格式的属性和方法。以下的示例设置了选定内容的字符和段落格式。 With Selection. Font .Name = "Times New Roman" .Size = 14 End With Selection. ParagraphFormat. LeftIndent = InchesToPoints (0.5) 返回一个Range对象 ...
FontNames使用可能なすべての横長フォントの名前を含む オブジェクトを返します。 (継承元 _Application) Language Microsoft Word のユーザー インターフェイスで選択した言語を表す MsoLanguageID 定数を返します。 (継承元 _Application) Languages Languages[言語] ダイアログ ボックスに一覧...
font = run.font font.size = Pt(12) # 设置字体大小 font.color.rgb = (0x00, 0x00, 0x00) # 设置字体颜色(这里是黑色) doc.save("vertical_text.docx") 1. 2. 3. 4. 5. 6. 7. 8. 9. 10. 11. 12. 13. 14. 15. 16. 17. 18. 19. 20. 21. 22. 23. 24. 25. 26. 27. 2...
p.add_run('字体设置\n').font.size = Pt(24) # 测试第三方字体 x = p.add_run('三方字体测试\n') x.font.name = 'Source Han Sans CN' # 思源字体 x.element.rPr.rFonts.set(qn('w:eastAsia'), 'Source Han Sans CN') # 段落和引用 document.add_heading('标题一:段落', level=1) doc...
打开或创建一个Word文档doc=Document()# 添加一个新的段落paragraph=doc.add_paragraph('这是一个有特定格式的段落。')# 设置字体、大小和颜色run=paragraph.add_run('这是加粗和蓝色的文本。')run.bold=Truerun.font.size=Pt(12)run.font.color.rgb=RGBColor(0,0,255)# 保存文档doc.save('formatted_text...
InchesToPoints 将度量单位从英寸转换为磅 (1 英寸 = 72 磅)。返回已转换为一个单一测量。 键盘 返回或设置键盘的语言和布局设置。 KeyboardBidi 将键盘语言设置为从右向左的语言,并将文字的输入方向设置为从右向左。 KeyboardLatin 将键盘语言设置为从左向右的语言,并将文字的输入方向设置为从左向右。 KeyStrin...
.Size = 14 .AllCaps = True End With With Selection.ParagraphFormat .LeftIndent = InchesToPoints(0.5) .Space1 End With End Sub 将格式应用于某一区域 下列示例定义了一个Range对象,它引用了活动文档的前三个段落。通过应用Font和ParagraphFormat对象的属性来设置Range对象的格式。
Just be aware that your Word document will probably still require you touse abook formatting softwareif you want a professional-looking bookfor self-publishing. The Layout Tab The default page size in Word is 8.5 by 11 inches. Most books are much smaller than this. So if you want to chang...
Sub ApplyTableFormat1()Dim tblTable As TableSettblTable = ActiveDocument.Tables(1)WithtblTable.Cell(1,1).Width = InchesToPoints(1.5).Shading.BackgroundPatternColor = wdColorBrown.Range.Font.Name ='Arial'.Range.Font.Size =10EndWithEndSub ...
' Visual Basic using VB = Microsoft.VisualBasic; Public Sub HiddenPageSetupDialog() Dim dlg As Word.Dialog dlg = ThisApplication.Dialogs( _ Word.WdWordDialog.wdDialogFilePageSetup) CallByName(dlg, "PageWidth", CallType.Let, ConvertToInches(3.3)) CallByName(dlg, "PageHeight", CallType.Let, Conv...