要获取Word中选中的文字，可以使用以下代码：
Dim selectedText As String selectedText = Selection.Text
上述代码将选中的文字赋值给变量selectedText。如果要将选中的文字输出到控制台，则可以使用以下代码：
selectedText
Debug.Print selectedText
这样就可以在Immediate窗口中看到选中的文字。
