[Bug] Erro na imagem

A imagem esta mostrando a coluna "Data da Compra" e não a "Data de entrega", seria bom corrigir isso

poem acredto que essa solução, não seja muito viavel,pela coluna condicional, pois os valores "null" na coluna Data de entrega, acabam gerando um erro! preferi fazer colunas personalizadas, que trata esse tipo de problema.

segue o codigo M da execução:

let
    Fonte = Excel.Workbook(File.Contents("D:\Cursos Alura\Power BI\Power BI - transformando dadoscom power query\base-de-dados-hermex.xlsx"), null, true),
    Pedidos_Sheet = Fonte{[Item="Pedidos",Kind="Sheet"]}[Data],
    #"Cabeçalhos Promovidos" = Table.PromoteHeaders(Pedidos_Sheet, [PromoteAllScalars=true]),
    #"Tipo Alterado" = Table.TransformColumnTypes(#"Cabeçalhos Promovidos",{{"Data de entrega", type text}, {"Data da compra", type date}, {"Data previsão", type date}, {"UF", type text}, {"Status do pedido", type text}, {"ID Veículo", type text}, {"Quantidade", Int64.Type}, {"ID Produto", Int64.Type}, {"ESTADO", type text}}),
    #"Colunas Removidas" = Table.RemoveColumns(#"Tipo Alterado",{"ESTADO"}),
    #"Dividir Coluna por Delimitador" = Table.SplitColumn(#"Colunas Removidas", "UF", Splitter.SplitTextByDelimiter("-", QuoteStyle.Csv), {"UF.1", "UF.2"}),
    #"Colunas Renomeadas" = Table.RenameColumns(#"Dividir Coluna por Delimitador",{{"UF.1", "Pais"}, {"UF.2", "ESTADO"}}),
    #"Valor Substituído" = Table.ReplaceValue(#"Colunas Renomeadas","Não disponível","",Replacer.ReplaceText,{"Data de entrega"}),
    #"Tipo Alterado1" = Table.TransformColumnTypes(#"Valor Substituído",{{"Data de entrega", type date}}),
    #"Colunas Renomeadas1" = Table.RenameColumns(#"Tipo Alterado1",{{"Status do pedido", "Status do Pedido"}, {"Data da compra", "Data da Compra"}, {"Data de entrega", "Data de Entrega"}, {"Data previsão", "Data Previsão"}, {"ESTADO", "Estado"}}),
    #"Personalização Adicionada" = Table.AddColumn(#"Colunas Renomeadas1", "Tempo de Entrega", each [Data de Entrega]-[Data da Compra]),
    #"Tipo Alterado2" = Table.TransformColumnTypes(#"Personalização Adicionada",{{"Tempo de Entrega", Int64.Type}}),
    #"Personalização Adicionada1" = Table.AddColumn(#"Tipo Alterado2", "Tempo Estimado da Entrega", each [Data Previsão]-[Data da Compra]),
    #"Tipo Alterado3" = Table.TransformColumnTypes(#"Personalização Adicionada1",{{"Tempo Estimado da Entrega", Int64.Type}}),
    #"Valor Substituído1" = Table.ReplaceValue(#"Tipo Alterado3",null,0,Replacer.ReplaceValue,{"Tempo de Entrega"}),
    #"Personalização Adicionada2" = Table.AddColumn(#"Valor Substituído1", "Status Entrega", each if [Tempo Estimado da Entrega] < [Tempo de Entrega] then "Atrasado" else "No Prazo"),
    #"Tipo Alterado4" = Table.TransformColumnTypes(#"Personalização Adicionada2",{{"Status Entrega", type text}})
in
    #"Tipo Alterado4"