Reply
Regular Visitor
Posts: 18
Registered: ‎10-02-2018
Accepted Solution

Create a Power Query entry in my Calendar to Add a sequence of months in Column

Hello,

 

I think is just a simple solution.

I need to create a Column in Power Query to make a perfect sequence of months.

Like:

 

Jan1
Fev2
Mar3
Abr4
Mai5
Jun6
Jul7
Ago8
Set9
Out10
Nov11
Dez12
Jan13
Fev14
Mar15
......

 

 

This goes until the end of the data calendar.

 

Here goes the code of my Calendar:

 

let
    Origem = #date(2019, 1, 1),
    Personalizado1 = List.Dates(Origem, Number.From(Date.EndOfYear(DateTime.LocalNow()))-Number.From(Origem)+4654, #duration(1,0,0,0)),
    #"Convertido em Tabela" = Table.FromList(Personalizado1, Splitter.SplitByNothing(), null, null, ExtraValues.Error),
    #"Colunas com Nome Mudado" = Table.RenameColumns(#"Convertido em Tabela",{{"Column1", "Data"}}),
    #"Ano Inserido" = Table.AddColumn(#"Colunas com Nome Mudado", "Ano", each Date.Year([Data]), type number),
    #"Mês Inserido" = Table.AddColumn(#"Ano Inserido", "Mês", each Date.Month([Data]), type number),
    #"Dia Inserido" = Table.AddColumn(#"Mês Inserido", "Dia", each Date.Day([Data]), type number),
    #"Semana do Ano Inserida" = Table.AddColumn(#"Dia Inserido", "Semana do Ano", each Date.WeekOfYear([Data]), type number),
    #"Tipo Alterado" = Table.TransformColumnTypes(#"Semana do Ano Inserida",{{"Data", type date}}),
    #"Nome do Mês Inserido" = Table.AddColumn(#"Tipo Alterado", "Nome do Mês", each Date.MonthName([Data]), type text),
    #"Tipo Alterado1" = Table.TransformColumnTypes(#"Nome do Mês Inserido",{{"Ano", Int64.Type}, {"Mês", Int64.Type}, {"Dia", Int64.Type}, {"Semana do Ano", Int64.Type}}),
    #"Colocar Cada Palavra Em Maiúscula" = Table.TransformColumns(#"Tipo Alterado1",{{"Nome do Mês", Text.Proper, type text}}),
    #"Personalização Adicionada" = Table.AddColumn(#"Colocar Cada Palavra Em Maiúscula", "Mês Abreviado", each Date.ToText([Data], "MMM")),
    #"Colocar Cada Palavra Em Maiúscula1" = Table.TransformColumns(#"Personalização Adicionada",{{"Mês Abreviado", Text.Proper, type text}}),
    #"Semana do Mês Inserida" = Table.AddColumn(#"Colocar Cada Palavra Em Maiúscula1", "Semana do Mês", each Date.WeekOfMonth([Data]), Int64.Type)
in
    #"Semana do Mês Inserida"

Accepted Solutions
Super User
Posts: 763
Registered: ‎09-16-2018

Re: Create a Power Query entry in my Calendar to Add a sequence of months in Column

let
    PrimeroAno = 2019,
    Origem = #date(PrimeroAno, 1, 1),
    Personalizado1 = List.Dates(Origem, Number.From(Date.EndOfYear(DateTime.LocalNow()))-Number.From(Origem)+4654, #duration(1,0,0,0)),
    #"Convertido em Tabela" = Table.FromList(Personalizado1, Splitter.SplitByNothing(), null, null, ExtraValues.Error),
    #"Colunas com Nome Mudado" = Table.RenameColumns(#"Convertido em Tabela",{{"Column1", "Data"}}),
    #"Ano Inserido" = Table.AddColumn(#"Colunas com Nome Mudado", "Ano", each Date.Year([Data]), type number),
    #"Mês Inserido" = Table.AddColumn(#"Ano Inserido", "Mês", each Date.Month([Data]), type number),
    #"Dia Inserido" = Table.AddColumn(#"Mês Inserido", "Dia", each Date.Day([Data]), type number),
    #"Semana do Ano Inserida" = Table.AddColumn(#"Dia Inserido", "Semana do Ano", each Date.WeekOfYear([Data]), type number),
    #"Tipo Alterado" = Table.TransformColumnTypes(#"Semana do Ano Inserida",{{"Data", type date}}),
    #"Nome do Mês Inserido" = Table.AddColumn(#"Tipo Alterado", "Nome do Mês", each Date.MonthName([Data]), type text),
    #"Tipo Alterado1" = Table.TransformColumnTypes(#"Nome do Mês Inserido",{{"Ano", Int64.Type}, {"Mês", Int64.Type}, {"Dia", Int64.Type}, {"Semana do Ano", Int64.Type}}),
    #"Colocar Cada Palavra Em Maiúscula" = Table.TransformColumns(#"Tipo Alterado1",{{"Nome do Mês", Text.Proper, type text}}),
    #"Personalização Adicionada" = Table.AddColumn(#"Colocar Cada Palavra Em Maiúscula", "Mês Abreviado", each Date.ToText([Data], "MMM")),
    #"Colocar Cada Palavra Em Maiúscula1" = Table.TransformColumns(#"Personalização Adicionada",{{"Mês Abreviado", Text.Proper, type text}}),
    #"Semana do Mês Inserida" = Table.AddColumn(#"Colocar Cada Palavra Em Maiúscula1", "Semana do Mês", each Date.WeekOfMonth([Data]), Int64.Type), 
    
    SequenciaMeses = Table.AddColumn(
                        #"Semana do Mês Inserida",
                        "SequenciaDoMes",
                        each [Mês] + ( [Ano] - PrimeroAno ) * 12,
                        Int64.Type )
    
    
in
    SequenciaMeses

Try this



Did I answer your question? Mark my post as a solution!


Proud to be a Datanaut!

View solution in original post


All Replies
Super User
Posts: 763
Registered: ‎09-16-2018

Re: Create a Power Query entry in my Calendar to Add a sequence of months in Column

let
    PrimeroAno = 2019,
    Origem = #date(PrimeroAno, 1, 1),
    Personalizado1 = List.Dates(Origem, Number.From(Date.EndOfYear(DateTime.LocalNow()))-Number.From(Origem)+4654, #duration(1,0,0,0)),
    #"Convertido em Tabela" = Table.FromList(Personalizado1, Splitter.SplitByNothing(), null, null, ExtraValues.Error),
    #"Colunas com Nome Mudado" = Table.RenameColumns(#"Convertido em Tabela",{{"Column1", "Data"}}),
    #"Ano Inserido" = Table.AddColumn(#"Colunas com Nome Mudado", "Ano", each Date.Year([Data]), type number),
    #"Mês Inserido" = Table.AddColumn(#"Ano Inserido", "Mês", each Date.Month([Data]), type number),
    #"Dia Inserido" = Table.AddColumn(#"Mês Inserido", "Dia", each Date.Day([Data]), type number),
    #"Semana do Ano Inserida" = Table.AddColumn(#"Dia Inserido", "Semana do Ano", each Date.WeekOfYear([Data]), type number),
    #"Tipo Alterado" = Table.TransformColumnTypes(#"Semana do Ano Inserida",{{"Data", type date}}),
    #"Nome do Mês Inserido" = Table.AddColumn(#"Tipo Alterado", "Nome do Mês", each Date.MonthName([Data]), type text),
    #"Tipo Alterado1" = Table.TransformColumnTypes(#"Nome do Mês Inserido",{{"Ano", Int64.Type}, {"Mês", Int64.Type}, {"Dia", Int64.Type}, {"Semana do Ano", Int64.Type}}),
    #"Colocar Cada Palavra Em Maiúscula" = Table.TransformColumns(#"Tipo Alterado1",{{"Nome do Mês", Text.Proper, type text}}),
    #"Personalização Adicionada" = Table.AddColumn(#"Colocar Cada Palavra Em Maiúscula", "Mês Abreviado", each Date.ToText([Data], "MMM")),
    #"Colocar Cada Palavra Em Maiúscula1" = Table.TransformColumns(#"Personalização Adicionada",{{"Mês Abreviado", Text.Proper, type text}}),
    #"Semana do Mês Inserida" = Table.AddColumn(#"Colocar Cada Palavra Em Maiúscula1", "Semana do Mês", each Date.WeekOfMonth([Data]), Int64.Type), 
    
    SequenciaMeses = Table.AddColumn(
                        #"Semana do Mês Inserida",
                        "SequenciaDoMes",
                        each [Mês] + ( [Ano] - PrimeroAno ) * 12,
                        Int64.Type )
    
    
in
    SequenciaMeses

Try this



Did I answer your question? Mark my post as a solution!


Proud to be a Datanaut!

Highlighted
Regular Visitor
Posts: 18
Registered: ‎10-02-2018

Re: Create a Power Query entry in my Calendar to Add a sequence of months in Column

@LivioLanzo,

 

I sayd, Simple Solution.

Sorry for take your time for that simple thing.

Is brilhiant use the difference in years.

 

Thx a lot!