Calendario en Power Query

Esto se puede pegar en Power Query, en una consulta en blanco, y se genera un calendario desde el primero de enero de 2014 hasta el día de hoy. Si quieres otra fecha inicial, modifica donde dice:

#date(2019, 1, 1)

en dos lugares la fórmula de Origen =

let

    Origen = List.Dates(#date(2019, 1, 1), Duration.Days(Duration.From(DateTime.Date(DateTime.LocalNow()) -(#date(2019, 1, 1)))) + 1, #duration(1, 0, 0, 0)),
    #"Convertida en tabla" = Table.FromList(Origen, Splitter.SplitByNothing(), null, null, ExtraValues.Error),
    #"Tipo cambiado" = Table.TransformColumnTypes(#"Convertida en tabla",{{"Column1", type date}}),
    #"Columnas con nombre cambiado" = Table.RenameColumns(#"Tipo cambiado",{{"Column1", "Fecha"}}),
    #"Año insertado" = Table.AddColumn(#"Columnas con nombre cambiado", "Año", each Date.Year([Fecha]), Int64.Type),
    #"Nombre del mes insertado" = Table.AddColumn(#"Año insertado", "Mes", each Date.MonthName([Fecha]), type text),
    #"Nombre del día insertado" = Table.AddColumn(#"Nombre del mes insertado", "Nombre del día", each Date.DayOfWeekName([Fecha]), type text),
    #"Mes insertado" = Table.AddColumn(#"Nombre del día insertado", "nMes", each Date.Month([Fecha]), Int64.Type),
    #"Día insertado" = Table.AddColumn(#"Mes insertado", "Día", each Date.Day([Fecha]), Int64.Type),
    #"Día de la semana insertado" = Table.AddColumn(#"Día insertado", "Día de la semana", each Date.DayOfWeek([Fecha]), Int64.Type)

in

    #"Día de la semana insertado"