如何选择特定Document Variable删除？现有代码删全部，需设置筛选条件

好问题！你当前的代码是直接移除了整个DocumentVariables节点，这自然会删掉所有文档变量。要实现只删除指定名称的变量，我们需要定位到具体的Variable元素，而不是直接删除父节点。

修改后的代码实现 #

Public Sub RemoveSpecificDocVariable(ByRef fileName As Object, ByVal variableName As String)
    Using doc = WordprocessingDocument.Open(fileName, True)
        ' 获取文档的设置部分
        Dim settingsPart = doc.MainDocumentPart.DocumentSettingsPart
        ' 定位到DocumentVariables节点（如果存在的话）
        Dim docVariables = settingsPart.Settings.GetFirstChild(Of DocumentVariables)()
        
        If docVariables IsNot Nothing Then
            ' 筛选出所有名称匹配的Variable元素（支持不区分大小写匹配，可按需调整）
            Dim variablesToRemove = docVariables.Elements(Of Variable)().
                Where(Function(v) v.Name.Value.Equals(variableName, StringComparison.OrdinalIgnoreCase)).
                ToList()
            
            ' 逐个删除筛选出的变量
            For Each var In variablesToRemove
                var.Remove()
            Next
            
            ' 可选：如果删除后DocumentVariables节点没有子元素了，可移除该节点保持文档结构整洁
            If Not docVariables.HasChildren Then
                docVariables.Remove()
            End If
        End If
    End Using
End Sub

关键说明 #

• 避免删除整个父节点：我们先获取DocumentVariables节点，而不是直接调用RemoveAllChildren<DocumentVariables>()，这样可以保留其他不需要删除的变量。
• 精准筛选变量：使用LINQ根据Name属性筛选目标变量，这里用了StringComparison.OrdinalIgnoreCase实现不区分大小写匹配，如果你需要严格区分大小写，改成StringComparison.Ordinal即可。
• 安全删除元素：先把要删除的变量转成List再遍历删除，避免直接遍历集合时修改集合导致的异常。
• 可选的清理步骤：如果删除指定变量后，DocumentVariables节点没有剩余子元素了，可以选择删除这个空节点，让文档结构更简洁。

调用示例 #

你可以这样调用这个方法来删除名为"TargetVariable"的文档变量：

RemoveSpecificDocVariable("C:\YourDocument.docx", "TargetVariable")

内容的提问来源于stack exchange，提问作者ERIC