请高手写代码，选种内容不定的第一页？

hhf2008 · 发表于 2004-9-10 17:13

请高手帮我写一段VBA代码，不论第一页的内容怎么变化，它都只选种第一页。

守柔 · 发表于 2004-9-10 19:56

Sub SelectFirstPage() ActiveDocument.Range(0, Selection.GoTo(What:=wdGoToPage, Which:=wdGoToNext, Name:="2").Start).Select End Sub

hhf2008 · 发表于 2004-9-13 10:16

那如果我希望跳过第一页，只选择第2--第3页？？

ActiveDocument.Range(0, Selection.GoTo(What:=wdGoToPage, Which:=wdGoToNext, Name:="2").Start).Select

斑竹最好能讲讲上述语句的用法，先谢谢了。

守柔 · 发表于 2004-9-13 10:34

原理，其实是定位功能，如果要选取第三页，则获得第三页的RANGE.start值,再定位到第四页,获得第四页的range.start值(而第四页的range.start值就是第三页的最后字符的RANGE.end)

这是以前的一个贴子,也请参考

:http://club.excelhome.net/viewthread.php?tid=25598

		自动登录	找回密码
密码			免费注册