转自:/s?id=1654133934465654783&wfr=spider&for=pc
以下是本人自学心得分享并记录,以便日后忘记了可以翻查,同时希望能帮到自学的朋友,测试环境为WORD,测试文档为纯文字文档,没有对插入图表、表格、图片、多媒体等内容的文档进行测试,有需要可以自行测试。
activedocument.Range(activedocument.Words.First.Start,activedocument.Words.Last.End).Select要对WORD文档内容进行选择就要先了角WORD文档内容的组成,大家在看小说的时候都能看到第几章第几节的,其它是WORD里也有分节的,可以在需要的时候手动插入,如果没有插入分节符,无论文档有多少页,都只有一个节,要插入节的时候可以点菜单栏》页面布局》分隔符》分节符,Sections(X)代表第X节。
无论有多少个节,
ActiveDocument.Sections.First.Range.Select都代表第一个节
ActiveDocument.Sections.Last.Range.Select都代表最后一个节
如果只有一个节,那么无论是选择第一节还是选择最后一节都相当于全选
无论有多少个节,都可以使用以下语句全选
ActiveDocument.Range(ActiveDocument.Sections.First.Range.Start, ActiveDocument.Sections.Last.Range.End).Select
上面词句意思意思是选择第一节开始到最后一节结尾,也就是全选的意思,ActiveDocument.Range(区域开始,区域结束),意思是为活动文本指定一个区域,区域里就是区域范围,指定区域开始和区域结束位置
每个节里有若干段落,段落标记^p,在“查找和替换”窗口中点击“特殊格式”就可以选择段落标志,或直接在查询内容中输入^p,段落标志由回车键产生,代表分段,一个回车就是一段。在WORD中回车符号见下图左边被方框圈着的标志。
Paragraphs(2),代表第二段落
整个文档由若干段落组成,所以我们也可以通过选择段落的方法全选
ActiveDocument.Range(ActiveDocument.Paragraphs.First.Range.Start, ActiveDocument.Paragraphs.Last.Range.End).Select
通常情况下,文档第一段是标题,如果我们要选择除标题外的其它所有内容则可以
ActiveDocument.Range(ActiveDocument.Paragraphs(2).Range.Start, ActiveDocument.Paragraphs.Last.Range.End).Select
每个段落又是由若干的句子组成,每个句子由若干的词组和字符组成,由此也是可以通过选择句子,单词或字符的方法全选。
Characters(index),字符
Words(index),单词,以WORD词库划分
Sentences(index)句子,以句号划分
通常标题只有一句内容,所以要选择除标题外的其它所有内容也可以写成
ActiveDocument.Range(ActiveDocument.Sentences(2).Start, ActiveDocument.Sentences.Last.End).Select
通过选择句子的方法全选可以写成
ActiveDocument.Range(ActiveDocument.Sentences.First.Start, ActiveDocument.Sentences.Last.End).Select
注意的是,"Sections节"和"Paragraphs段落"后面是要写上range对象的,但“Sentences句子”、“Words单词”、“Characters字符”后面是不用接range,
通过选择单词的方法全选可以写成
activedocument.Range(activedocument.Words.First.Start,activedocument.Words.Last.End).Select
通过选择字符的方法全选和其它的有点区别,直接写上从第几个字符到第几个字符就可以了,由于不知道有多少个字符所以可以使用ActiveDocument.Characters.Count得到总字符数
ActiveDocument.Range(0, ActiveDocument.Characters.Count).Select
当前也可以写成和通过单词或句子一样的方法
ActiveDocument.Range(ActiveDocument.Characters.First.Start,ActiveDocument.Characters.Last.End).Select
但不建议使用字符的方法来全选,毕竟是以字符为单位,如果文章内容多的时候,运行效率是会明显比选择节或段落的方法低。如果要区分标题和正文内容的话,建议使用段落的选择方法,如果是包括标题的所有文字内容建议使用
ActiveDocument.Content.Select '全选文字内容
Content代表主文档文字部分 (文章:包含文档中可区别于其他文字区域的文字区域。例如,如果文档包括正文文本、脚注和标题,则文章包含主文章、脚注文章和标题文章。)
需要在文章最后添加内容可以
ActiveDocument.Content.InsertAfter "文章后新增内容"