vba语句 能删除我选中的这个么

有没有熟悉vba的大神，解答一下

WordVBA：根据样式进行替换

Sub 通配符查找_某样式字符全部删除()
    Dim aDoc As Document
    Set aDoc = ActiveDocument
    With aDoc.Content.Find
        .ClearFormatting
        .Wrap = wdFindStop
        .Forward = True
        .MatchWildcards = True
        .Text = "?"
        .Style = "样式名"  '这里填写要目标样式名
        With .Replacement
            .ClearFormatting
            .Text = ""    '替换框内为空
        End With
        .Execute Replace:=wdReplaceAll
    End With
    Set aDoc = Nothing
End Sub