怎样在word中选取一整页?
想选取a.doc其中第二页,然后存为b.doc
应该怎么做呢?
[解决办法]
Private Sub test()
Dim rng As Range
Dim intStart As Integer
Dim intEnd As Integer
ActiveDocument.Range(0, 1).Select
With Selection
.GoTo(what:=wdGoToPage, which:=wdGoToNext, Count:=1).Select
intStart = .Start
.GoTo(what:=wdGoToPage, which:=wdGoToNext, Count:=1).Select
intEnd = .End
End With
ActiveDocument.Range(intStart, intEnd).Select
End Sub
