怎么用vb获得光标当前所在的页面的页码?怎么用vb选中多个word页面内容

如何用vb获得光标当前所在的页面的页码?如何用vb选中多个word页面内容?
比如现在光标(不是鼠标)现处在word的第3页,如何用vb得到这个页码“3”?
如何用vb选中word文件的第1—3页内容以便拷贝(不是用鼠标拖拽)?
谢谢!

------解决方案--------------------
VB code
Private Sub Command1_Click()
Dim wordapp As Object, doc As Object
Set wordapp = GetObject(, "word.application")
Set doc = wordapp.activedocument
MsgBox wordapp.Selection.Information(3)
Set doc = Nothing
End Sub