Erro ao Importar pasta.

[André dos Santos Cruz]

Ao tentar importar uma pasta com 4 arquivos, 2017, 2018, 2019 e 2020, ao combinar arquivos ele só puxa a primeira tabela e da um erro nas demais. 

[Rafa Lemos]

@André dos Santos Cruz boa tarde!

Testa esse script M:

let
    Source = Folder.Files(Diretorio),
    #"Filtered Rows" = Table.SelectRows(Source, each [Extension] = ".xlsx"),
    #"Added Custom" = Table.AddColumn(#"Filtered Rows", "Conteúdo", each Excel.Workbook([Content])),
    #"Removed Other Columns" = Table.SelectColumns(#"Added Custom",{"Name", "Conteúdo"}),
    #"Expanded Conteúdo" = Table.ExpandTableColumn(#"Removed Other Columns", "Conteúdo", {"Data"}, {"Conteúdo.Data"}),
    #"Expanded Conteúdo.Data" = Table.ExpandTableColumn(#"Expanded Conteúdo", "Conteúdo.Data", {"Column1", "Column2", "Column3", "Column4", "Column5", "Column6", "Column7", "Column8", "Column9", "Column10", "Column11", "Column12", "Column13", "Column14", "Column15", "Column16"}, {"Column1", "Column2", "Column3", "Column4", "Column5", "Column6", "Column7", "Column8", "Column9", "Column10", "Column11", "Column12", "Column13", "Column14", "Column15", "Column16"}),
    #"Filtered Rows1" = Table.SelectRows(#"Expanded Conteúdo.Data", each [Column16] <> null and [Column16] <> ""),
    #"Filled Down" = Table.FillDown(#"Filtered Rows1",{"Column1", "Column2"}),
    #"Promoted Headers" = Table.PromoteHeaders(#"Filled Down", [PromoteAllScalars=true]),
    #"Changed Type" = Table.TransformColumnTypes(#"Promoted Headers",{{"Vendas 2017.xlsx", type text}, {"Região", type text}, {"UF", type text}, {"Cidade", type text}, {"(Mês 01) Janeiro", type any}, {"(Mês 02) Fevereiro", type any}, {"(Mês 03) Março", type any}, {"(Mês 04) Abril", type any}, {"(Mês 05) Maio", type any}, {"(Mês 06) Junho", type any}, {"(Mês 07) Julho", type any}, {"(Mês 08) Agosto", type any}, {"(Mês 09) Setembro", type any}, {"(Mês 10) Outubro", type any}, {"(Mês 11) Novembro", type any}, {"(Mês 12) Dezembro", type any}, {"Total", type any}}),
    #"Filtered Rows2" = Table.SelectRows(#"Changed Type", each ([Cidade] <> null and [Cidade] <> "Cidade")),
    #"Removed Columns" = Table.RemoveColumns(#"Filtered Rows2",{"Total"}),
    #"Renamed Columns" = Table.RenameColumns(#"Removed Columns",{{"Vendas 2017.xlsx", "Ano"}}),
    #"Extracted Text Between Delimiters" = Table.TransformColumns(#"Renamed Columns", {{"Ano", each Text.BetweenDelimiters(_, "Vendas ", ".xlsx"), type text}}),
    #"Unpivoted Other Columns" = Table.UnpivotOtherColumns(#"Extracted Text Between Delimiters", {"Ano", "Região", "UF", "Cidade"}, "Mês", "Valor")
in
    #"Unpivoted Other Columns"

Só criar uma consulta nula, ir em editor avançado e colar esse script.
Imagino que isso possa resolver.

Pelo que verifiquei no teu arquivo PBIX, você importou todos os arquivos XLSX e não via pasta.