Selection.EndKey Unit:=wdLine, Extend:=wdExtend Move Up Paragraph 上移段落 Selection.MoveUp Unit:=wdParagraph, Count:=1 Move Right One Character 向右移动一个字符 Selection.MoveRight Unit:=wdCharacter, Count:=1 Move Right
Move Up Paragraph 上移段落 Selection.MoveUp Unit:=wdParagraph, Count:=1 Move Right One Character 向右移动一个字符 Selection.MoveRight Unit:=wdCharacter, Count:=1 Move Right One Cell in Table 在表格中向右移动一个单元格 Selection.MoveRight Unit:=wdCell Go To Start of Doc 转到文档开头 Selection...
Paragraph对象(353)Selection.Paragraphs.Count '返回选区域的段落数(354)Selection.Paragraphs.First '返回所选区域中的第一段355)ActiveDocument.Paragraphs(1).LeftIndent '返回当前文档中第一段的左缩进值(356)ActiveDocumentParagraphs(1).LineSpacing '返回当前文档中第一段的行距(357ActiveDocument.Paragraphs(1...
.Font.Name = "Arial".ParagraphFormat.Alignment = wdAlignParagraphJustify End With End Sub ③插入文字并应用字符和段落格式 下列示例在当前文档的上部添加单词 Title。第一段居中对齐，并在该段落之后添加半英寸的间距。将单词 Title 的格式设为 24 磅 Arial 字体。Sub InsertFormatText()Dim rngF...
InsertParagraphAfter - Inserts a paragraph mark after a selection. InsertParagraphBefore - Inserts a new paragraph before the specified selection or range. InsertRows - Inserts the specified number of new rows above the row that contains the selection. If the selection isn't in a table, an ...
' Move to just after this paragraph mark and insert two new paragraphs. rng.Collapse Directio...
.ParagraphFormat.Alignment = wdAlignParagraphJustify EndWith End Sub ③插入文字并应用字符和段落格式 下列示例在当前文档的上部添加单词Title。第一段居中对齐,并在该段落之后添加半英寸的间距。将单词Title的格式设为24磅Arial字体。 Sub InsertFormatText() Dim rngFormat As Range Set rngFormat = ActiveDocument...
End) With rngFormat .Font.Name = "Arial" .ParagraphFormat.Alignment = wdAlignParagraphJustify End With End Sub 插入文本并应用字符和段落格式 以下示例在当前文档的顶部添加“Title”。 第一段居中对齐,并在该段落之后添加半英寸的间距。 将单词"Title"的格式设为 24 磅 Arial 字体。 vbnet Sub Insert...
.ParagraphFormat.Alignment = wdAlignParagraphJustify End With End Sub 插入文字并应用字符和段落格式 下列示例在当前文档的上部添加单词 Title。第一段居中对齐,并在该段落之后添加半英寸的间距。将单词 Title 的格式设为 24 磅 Arial 字体。 Sub InsertFormatText() Dim rngFormat As Range Set rngFormat = Act...
Paragraphs/Paragraph对象 - - - - - - - - - - - - - - - - - - - - - - (353) Selection.Paragraphs.Count '返回所选区域的段落数 (354) Selection.Paragraphs.First '返回所选区域中的第一段 (355) ActiveDocument.Paragraphs(1).LeftIndent '返回当前文档中第一段的左缩进值 ...