AHK+VBA单词:转到页面末尾(字符结尾),最多选择第7行

AHK+VBA单词:转到页面末尾(字符结尾),最多选择第7行,vba,ms-word,autohotkey,Vba,Ms Word,Autohotkey,试图让AHK在第1页中选择一系列文本。从7号线开始。问题是我永远不知道第一页将包含多少行,所以我不能告诉它移到某一行。我需要它基本上转到最后一行的末尾,然后选择selection.moveup到第7行 SetTitleMatchmode, 2 oWord := ComObjActive("Word.Application") WinActivate, - Word oWord.Visible := true oWord.Selection.GoTo(1, 2) ; 1 = GotoPag

试图让AHK在第1页中选择一系列文本。从7号线开始。问题是我永远不知道第一页将包含多少行,所以我不能告诉它移到某一行。我需要它基本上转到最后一行的末尾,然后选择selection.moveup到第7行

    SetTitleMatchmode, 2
oWord := ComObjActive("Word.Application")
WinActivate, - Word
oWord.Visible := true
oWord.Selection.GoTo(1, 2) ; 1 = GotoPage, 2 = Go to page #

这让我进入了第一页的开头。我尝试过不同的方法,但似乎没有什么能达到我想要的效果。有什么想法吗?

我不熟悉自动热键,所以我不确定您可以使用以下内容中的多少。但总的来说,以下几点是为了:

转到有问题的那一页 选择整个页面 将选择起点向下移动7行 \页面是Word应用程序中的内置书签,用于选择当前所选内容所在的整个页面

oWord.Selection.GoTo 1, 1 ; 1 = GotoPage, 2 = Go to page #
oWord.ActiveDocument.Bookmarks("\Page").Range.Select
oWord.Selection.MoveStart 5, 7 ; 5 = wdLine

为了遵守网站提问指南,你不应该在一个问题中问一件以上的事情。但是你可以发布多个问题。使用链接修改您的问题。请使用ms word标签,而不是word标签-这是不同的:-