如何用VBA全选word当前页代码？

    1.全选第一页，建书签名为“第一页”，再用书签定位就全选第一页了，把定位过程录制成宏。

    2.按“Alt+F11”组合键打开VBA窗口，双击左侧的“工程资源管理器”窗口的“ThisDocument”，在弹出的空白窗口中输入以下代码：

    Subdingwei()

    Selection.GoToWhat:=wdGoToBookmark,Name:="第一页"

    EndSub

    按F5键运行即可。