Alterar fonte da tabela dinâmica

[Gabriel Koerich]

Mando a macro procurar a linha que deve ficar em outra planilha e limitar a tabela dinâmica até essa linha da outra planilha

o problema é que ele sempre da aquele erro dizendo que o nome do campo não é valido

que problema pode ser?

Sheets("dados").Select
    Range("J15").Select
    Selection.ListObject.QueryTable.Refresh BackgroundQuery:=False

    Range("a1").Select
    Selection.End(xlDown).Select
    l = Selection.Offset(1, 0).Select
    l = ActiveCell.Row
    Dim b As String
    b = "C:\Users\Administrador\Desktop\[pedidos a vista.xls]pedidos!L1C1:L" & l & "C9"
  
    Sheets("tabela").Select
    Range("C17").Select
    
    ActiveSheet.PivotTables("Tabela dinâmica1").ChangePivotCache ActiveWorkbook. _
    PivotCaches.Create(SourceType:=xlDatabase, SourceData:= _
    b, Version:=xlPivotTableVersion10)

[Gabriel Koerich]

alguém sabe como posso fazer?