尝试从不同工作簿的数据创建图表时出现运行时错误9

Sub CreateChartFromAnotherWorkbook()
    Dim wbSource As Workbook
    Dim wsSource As Worksheet
    Dim wsDest As Worksheet
    Dim chrt As Chart
    Dim rngData As Range
    
    ' 打开源工作簿
    Set wbSource = Workbooks.Open("C:\path\to\source\workbook.xlsx")
    
    ' 设置源工作表和目标工作表
    Set wsSource = wbSource.Sheets("Sheet1") ' 确保这个工作表存在
    Set wsDest = ThisWorkbook.Sheets("Sheet1") ' 当前工作簿的目标工作表
    
    ' 定义数据范围
    Set rngData = wsSource.Range("A1:B10") ' 确保这个范围存在且有效
    
    ' 在目标工作表上创建图表
    Set chrt = wsDest.Shapes.AddChart2(201, xlColumnClustered).Chart
    
    ' 设置图表的数据源
    With chrt
        .SetSourceData Source:=rngData
        .HasTitle = True
        .ChartTitle.Text = "Sample Chart"
    End With
    
    ' 关闭源工作簿，不保存更改
    wbSource.Close SaveChanges:=False
End Sub