要摆脱工作簿中的无效绑定，可以使用以下代码示例中的方法：

方法1：使用VBA代码删除无效绑定

Sub DeleteInvalidBindings()
    Dim wb As Workbook
    Dim ws As Worksheet
    Dim pb As PivotTable
    Dim i As Integer
    
    ' 设置要处理的工作簿
    Set wb = ThisWorkbook
    
    ' 遍历每个工作表
    For Each ws In wb.Worksheets
        ' 遍历每个数据透视表
        For Each pb In ws.PivotTables
            ' 删除无效的数据透视表绑定
            For i = pb.PivotCache.WorkbookConnections.Count To 1 Step -1
                If Not pb.PivotCache.WorkbookConnections(i).IsConnected Then
                    pb.PivotCache.WorkbookConnections(i).Delete
                End If
            Next i
        Next pb
    Next ws
    
    MsgBox "已删除无效绑定。"
End Sub

方法2：使用Power Query删除无效绑定

1. 在Excel中，选择“数据”选项卡，然后点击“从表格/范围”按钮。
2. 在“从表格/范围”对话框中，选择需要处理的数据表格。
3. 点击“编辑”按钮，进入Power Query编辑器。
4. 在Power Query编辑器中，选择“主页”选项卡，然后点击“合并查询”按钮下的“合并查询”选项。
5. 在“合并查询”对话框中，选择“Excel工作簿”选项卡。
6. 在“Excel工作簿”选项卡中，选择要合并的工作簿，然后点击“确定”按钮。
7. 在Power Query编辑器中，选择“主页”选项卡，然后点击“关闭和加载”按钮下的“关闭并加载到...”选项。
8. 在“关闭和加载到”对话框中，选择要加载的位置，并勾选“加载到数据模型”选项，然后点击“加载”按钮。
9. 关闭Power Query编辑器后，无效的绑定将被删除，并将数据加载到工作簿中。

以上是两种常用的方法，可以帮助您摆脱工作簿中的无效绑定。