在Word VBA中，当MsgBox询问我要做什么时，在Word中显示所选内容

在Word VBA中，当MsgBox询问用户要做什么时，可以使用Selection对象来获取用户选择的内容，并在Word中进行显示。

首先，我们需要使用MsgBox函数来显示询问用户的消息框，并获取用户的选择。代码如下：

Dim userChoice As Integer
userChoice = MsgBox("请选择要显示的内容", vbYesNoCancel)

If userChoice = vbYes Then
    ' 用户选择了“是”
    MsgBox Selection.Text
ElseIf userChoice = vbNo Then
    ' 用户选择了“否”
    ' 清空选择内容
    Selection.Text = ""
Else
    ' 用户选择了“取消”
    ' 取消操作，不做任何处理
End If

上述代码中，我们使用了MsgBox函数显示一个消息框，并将用户的选择保存在userChoice变量中。

如果用户选择了“是”(vbYes)，则使用Selection对象的Text属性获取所选内容，并使用MsgBox函数显示所选内容。

如果用户选择了“否”(vbNo)，则使用Selection对象的Text属性将所选内容清空。

如果用户选择了“取消”(vbCancel)，则不做任何处理。

请注意，上述代码只适用于当前活动的Word文档。如果你需要在多个文档之间进行选择和显示内容，你需要使用Documents集合和Document对象来实现。

这里没有提及腾讯云的相关产品和链接地址，因为目前腾讯云没有与Word VBA直接相关的产品。如果您有其他关于云计算或其他领域的问题，我将很乐意为您提供帮助和答案。