Modelagem de tabela

[Edmar Nunes]

Olá, preciso estruturar no power query uma tabela onde as informações vem misturadas em uma coluna. Veja na imagem como vem e como preciso que fique. 

[Henrique Merola Faria]

Bom dia @Edmar Nunes
Essa tabela de origem é um excel, csv,... ?
Você poderia disponibilizar um arquivo original desses, sem alterações ? (ou parte dele)

[Edmar Nunes]

Olá Henrique! Tudo bom? Essa tabela em Excel foi para exemplificar. A base original tem 38 colunas e mais de 1.000 linhas.

[Bruno Abdalla de Souza]

Disponibiliza um exemplo pequeno da base e mostra o resultado esperado, por favor.

[Edmar Nunes]

Seria o que está na imagem acima, segue o arquivo.

Tabela exemplo.xlsx

[Bruno Abdalla de Souza]

let
    Fonte = Excel.Workbook(File.Contents("C:\Caminho\Tabela exemplo.xlsx"), null, true),
    AcessaDados = Fonte{[Item="Planilha1",Kind="Sheet"]}[Data],
    PromoveCabecalhos = Table.PromoteHeaders(AcessaDados, [PromoteAllScalars=true]),
    SelecionaColunas = Table.SelectColumns(PromoveCabecalhos,{"Tabela Original", "Column2"}),
    TranspoeTabela = Table.Transpose(SelecionaColunas),
    TransformaColunasEmLinhas = Table.UnpivotOtherColumns(TranspoeTabela, {"Column1"}, "Atributo", "Valor"),
    RemoveColunaAtributo = Table.RemoveColumns(TransformaColunasEmLinhas,{"Atributo"}),
    AdicionaColunaNome = Table.AddColumn(RemoveColunaAtributo, "Nome", each if Text.Select(Text.From([Valor]), {"A".."Z", "a".."Z"}) = "" then null else [Valor], type text),
    PreencheNomeParaCima = Table.FillUp(AdicionaColunaNome,{"Nome"}),
    FiltraApenasValores = Table.SelectRows(PreencheNomeParaCima, each Text.Select(Text.From([Valor]), {"0".."9"}) <> ""),
    RenomeiaColunaData = Table.RenameColumns(FiltraApenasValores,{{"Column1", "Data"}}),
    AlteraTipoDados = Table.TransformColumnTypes(RenomeiaColunaData,{{"Data", type date}, {"Valor", type number}})
in
    AlteraTipoDados

 

20241009_ModelagemTabela.pbix