Table date à transformer

Bonsoir à tous,

J'ai une colonne en date texte mais je voudrais pouvoir la transformer avec Power Query comme sur le fichier joint,

Merci d'avance pour votre aide,

Cordialement,

Bonsoir,

Voir fichier joint, formule à côté de la colonne "Date souhaitée".

Cdlt,

Cylfo

Hello,

Une proposition PowerQuery,

@+

Bonsoir à tous,

Merci à vous deux pour vos retours, je souhaite effectivement une solution via Power query,

@BAROUTE78, c'est parfait il ne me manque que le cas de la dernière ligne, ou je souhaiterai l'année.

Mais ça me convient déjà comme ceci, merci pour votre proposition,

Bonne soirée à vous,

Cordialement,

Hello, voici la petite modification

J'avais pas vu my bad

@+

Bonjour / Bonsoir () à tous !

Pour le fun, une approche Power Query différente :

let
    Source = Excel.CurrentWorkbook(){[Name="Tableau1"]}[Content],
    TransfDate = Table.AddColumn(Source,"Date", each
        let
            fnDate=(ValDate)=>Text.Upper(Date.MonthName(Date.FromText(Text.Range(ValDate,0,8)&"01"))),
            a= 
                if Text.EndsWith([DATE TEXTE],"TM") then fnDate([DATE TEXTE])
                else if Text.EndsWith([DATE TEXTE],"é") then "CUMUL " & fnDate([DATE TEXTE])
                else if Text.StartsWith([DATE TEXTE],"T") then Text.Start(Source[DATE TEXTE]{0},4)
                else  Date.FromText([DATE TEXTE],"fr-FR")
        in 
            a)
in
    TransfDate

Bonjour à tous les trois,

Merci pour vos solutions, je considère donc le post résolu

Cordialement,

Bonjour à tous,

Je relance ce post car je souhaiterais obtenir en plus le mois et l'année,

Merci d'avance pour vos propositions,

Cordialement,

Bonjour

Si j'ai bien compris (???)

let
    Source = Excel.CurrentWorkbook(){[Name="Tableau1"]}[Content],
    TransfDate = Table.AddColumn(Source,"Date", each
        let
            fnDate=(ValDate)=>Text.Upper(Date.MonthName(Date.FromText(Text.Range(ValDate,0,8)&"01")))&" "&Text.Start(ValDate,4),
            a= 
                if Text.EndsWith([DATE TEXTE],"TM") then fnDate([DATE TEXTE])
                else if Text.EndsWith([DATE TEXTE],"é") then "CUMUL " & fnDate([DATE TEXTE])
                else if Text.StartsWith([DATE TEXTE],"T") then Text.Start(Source[DATE TEXTE]{0},4)
                else  Date.FromText([DATE TEXTE],"fr-FR")
        in 
            a)
in
    TransfDate

Bonjour 78Chris,

Merci pour votre retour, mais effectivement j'ai du mal m’exprimer, je souhaiterai avoir deux colonnes supplémentaires : l'une avec le mois en lettre et l'autre avec l'année, à partir de la colonne DATE TEXTE ... mais peut être que la solution réside également à partir de la colonne DATE OBTENUE du code proposé par JFL ou BAROUTE78,

Merci d'avance,

Cordialement,

Bonjour à tous !

Une proposition ?

let
    Source = Excel.CurrentWorkbook(){[Name="Tableau1"]}[Content],
    TransfDate = let
            fnDate=(ValDate)=>Text.Upper(Date.MonthName(Date.FromText(Text.Range(ValDate,0,8)&"01"))),
            a=Table.AddColumn(Source,"Date", each
                        if Text.EndsWith([DATE TEXTE],"TM") then fnDate([DATE TEXTE])
                        else if Text.EndsWith([DATE TEXTE],"é") then "CUMUL " & fnDate([DATE TEXTE])
                        else if Text.StartsWith([DATE TEXTE],"T") then Text.Start(Source[DATE TEXTE]{0},4)
                        else  Date.FromText([DATE TEXTE],"fr-FR")
            )
    in
    a,
TransfDate2 = 
        let
            fnDate2=(ValDate)=>Date.FromText(Text.Range(ValDate,0,8)&"01"),
            a= Table.AddColumn(TransfDate,"Année", each Date.Year(fnDate2([DATE TEXTE])), Int64.Type),
            b= Table.AddColumn(a,"Mois", each  Text.Upper(Date.MonthName(fnDate2([DATE TEXTE]))), Text.Type)
        in 
            b
in
    TransfDate2

Note : La première transformation a été conservée. A supprimer le cas échéant.

Bonjour à tous,

Merci JFL pour votre proposition, c'est parfait !

Bon dimanche à vous,

Cordialement,

Bonjour à tous !

Je vous remercie de ce retour.