求一句代码：表示word文档第1到第10行的区域

jiminyanyan

请看这个..........

weiyingde

怎么会有两个版本呢？我的那个也是网上查到的。
你的介绍似乎是对的……真是怪……

jiminyanyan

weiyingde 发表于 2017-4-28 21:27
怎么会有两个版本呢？我的那个也是网上查到的。
你的介绍似乎是对的……真是怪……

可以是下列 WdUnits 常量之一：
     wdCharacter
        wdWord
        wdSentence
        wdParagraph
        wdSection
        wdStory
        wdCell
        wdColumn
        wdRow
         wdTable。
这段是对的.....
没说wdCharacter 是1 ,wdWord是2 ,   .....

dafanshu1

小花鹿 发表于 2017-4-28 16:40
谢谢，找到了，要点搜索后面的黑三角，再点开发人员参考，依次往下找
建议你用2010，别用2007了

谢谢提醒，我也知道07版是有点问题的，还好未对工作造成多大影响，所以就懒得换了，在家里也是装2010版的。

weiyingde

Sub shishi()
    Dim arr()
    ActiveDocument.Bookmarks("\StartOfDoc").Select
    With Selection
        Do
            n = n + 1: ReDim Preserve arr(1 To n)
            .Collapse 0: .MoveEnd 5, 10: arr(n) = .Text
        Loop Until .End = ActiveDocument.Content.End
    End With
End Sub
这个是word内置书签吧？没有百度到相关的资料，还有哪些是内置书签，能讲解一下吗？

小花鹿

weiyingde 发表于 2017-4-29 08:51
Sub shishi()
    Dim arr()
    ActiveDocument.Bookmarks("\StartOfDoc").Select

28楼的朋友说了，帮助里有，预定义的书签

weiyingde

小花鹿 发表于 2017-4-29 12:32
28楼的朋友说了，帮助里有，预定义的书签

能把你的word帮助文件发我一份吗？谢谢

小花鹿

weiyingde 发表于 2017-4-29 13:32
能把你的word帮助文件发我一份吗？谢谢

我不知道文件在什么位置

weiyingde

小花鹿 发表于 2017-4-29 17:08
我不知道文件在什么位置

在c盘office安装目录，你搜索.chm格式的文件，应该能搜到。

dafanshu1

weiyingde 发表于 2017-4-29 08:51
Sub shishi()
    Dim arr()
    ActiveDocument.Bookmarks("\StartOfDoc").Select

把帮助的内容贴上来吧。你装的版本没有帮助？上网找个完整版的吧，或者去电脑城买张安装盘，我那时就是买的，懒得在网上找来慢慢下载了，你如果需要我可以试试发到你QQ邮箱，2010版的。

预定义的书签

Microsoft Office Word 设置了大量的保留书签，并可自动更新这些书签。这些预定义书签的使用方法与您放入文档中的书签的使用方法基本相同，区别之处在于您不必对它们进行设置，并且在“查找和替换”对话框中的“定位”选项卡上未列出这些预定义书签。

可通过 Bookmarks 属性使用预定义书签。以下示例将名为“currpara”的书签设置到由名为“\Para”的预定义书签标记的位置。

ActiveDocument.Bookmarks("\Para").Copy "currpara"

下表对 Word 提供的预定义书签进行了描述。

书签 说明
\Sel 当前所选内容或插入点。
\PrevSel1 最近编辑过的所选内容；定位至该书签相当于运行一次 GoBack 方法。
\PrevSel2 倒数第二次编辑过的所选内容；定位至该书签相当于运行两次 GoBack 方法。
\StartOfSel 当前所选内容的起点。
\EndOfSel 当前所选内容的终点。
\Line 当前行或当前所选内容的首行。如果插入点在本段非最后一行的行尾，该书签包含完整的下一行。
\Char 当前字符，它是插入点后面的字符（当没有选定内容时）或所选内容的第一个字符。
\Para 当前段，即包含插入点的段，或在选定多个段落时所选段落中的第一段。请注意，如果插入点或所选内容位于文档的最后一段，则“\Para”书签不包含段落标记。
\Section 当前节，并可能包含节尾的分隔符。当前节包含插入点或所选内容。如果所选内容包含多个节，则“\Section”书签为所选内容中的第一节。
\Doc 活动文档中的全部内容（文档结尾处的段落标记除外）。
\Page 当前页，并可能包含页尾的分隔符。当前页包含插入点。如果当前所选内容包含多页，则“\Page”书签为所选内容的第一页。注意，如果插入点或所选内容位于文档中的最后一页，则“\Page”书签不包含文档结尾的段落标记。
\StartOfDoc 文档开头。
\EndOfDoc 文档结尾。
\Cell 表格中当前的单元格，即包含插入点的单元格。如果当前所选内容包含表中一个或多个单元格，则“\Cell”书签为所选内容的第一个单元格。
\Table 当前表格，即包含插入点或所选内容的表格。如果所选内容包含多个表格，则“\Table”书签为所选内容中完整的第一个表格（即使未选定完整的表格）。
\HeadingLevel 包含插入点或所选内容的标题，及其子标题和文字。如果当前所选内容为正文文字，则“\HeadingLevel”书签包含上一个标题以及该标题包含的任何子标题和文字。