Skip to main content
cancel
Showing results for 
Search instead for 
Did you mean: 

Join us for an expert-led overview of the tools and concepts you'll need to become a Certified Power BI Data Analyst and pass exam PL-300. Register now.

Reply
DonPepe
Helper II
Helper II

Clean up M code

Hello, 

 

I would like to know if you have another mean (more clean) to get the same result. And if not, how can I modify my code to be more understanble ? 

 

The purpose of the code is to filter the last week of the imported data (from sunday to saturday) 

 

 

let
    Source = Excel.Workbook(File.Contents("C:\Users\TabData.xlsx"), null, true),
    Tableau1_Table = Source{[Item="Tableau1",Kind="Table"]}[Data],
    AddDateMaxDb = Table.AddColumn(Table.TransformColumnTypes(Tableau1_Table,{{"PLAATY Start 
           Date", type date}}), "Personnalisé", each 
           List.Max(Table.TransformColumnTypes(Tableau1_Table,{{"PLAATY Start Date", type 
           date}})[PLAATY Start Date])),
    AddDateL = Table.AddColumn(AddDateMaxDb, "Personnalisé.1", each 
           Date.AddDays(Date.AddWeeks(Date.StartOfWeek([Personnalisé]),-1),-1)),
    #"Personnalisée ajoutée2" = Table.AddColumn(AddDateL, "Personnalisé.2", each if [PLAATY 
           Start Date] >= Date.AddDays(Date.AddWeeks(Date.StartOfWeek([Personnalisé]),-1),-1) 
           and [PLAATY Start Date] <= 
           Date.AddDays(Date.AddWeeks(Date.StartOfWeek([Personnalisé]),-1),+5) then [PLAATY 
           Start Date] else "O"),
    #"Colonnes supprimées" = Table.RemoveColumns(Table.SelectRows(#"Personnalisée ajoutée2", 
           each ([Personnalisé.2] <> "O")),{"Personnalisé", "Personnalisé.1", 
           "Personnalisé.2"})
in
    #"Colonnes supprimées"

 

Thanks in advance ! 

 

Don 

1 ACCEPTED SOLUTION
wdx223_Daniel
Super User
Super User

let
    Source = Excel.Workbook(File.Contents("C:\Users\TabData.xlsx"), null, true),
    Tableau1_Table = Table.TransformColumnTypes(Source{[Item="Tableau1",Kind="Table"]}[Data],{{"PLAATY Start Date", type date}}),
    DateMax = List.Max(Tableau1_Table[PLAATY Start Date]),
    DateL = Date.AddDays(Date.AddWeeks(Date.StartOfWeek(DateMax),-1),-1),
    DateM = Date.AddDays(Date.AddWeeks(Date.StartOfWeek(DateMax),-1),+5),
    Custom1 = Table.SelectRows(Tableau1_Table,each [PLAATY Start Date] >=DateL and [PLAATY Start Date] <= DateM))
in
    Custom1

View solution in original post

3 REPLIES 3
wdx223_Daniel
Super User
Super User

let
    Source = Excel.Workbook(File.Contents("C:\Users\TabData.xlsx"), null, true),
    Tableau1_Table = Table.TransformColumnTypes(Source{[Item="Tableau1",Kind="Table"]}[Data],{{"PLAATY Start Date", type date}}),
    DateMax = List.Max(Tableau1_Table[PLAATY Start Date]),
    DateL = Date.AddDays(Date.AddWeeks(Date.StartOfWeek(DateMax),-1),-1),
    DateM = Date.AddDays(Date.AddWeeks(Date.StartOfWeek(DateMax),-1),+5),
    Custom1 = Table.SelectRows(Tableau1_Table,each [PLAATY Start Date] >=DateL and [PLAATY Start Date] <= DateM))
in
    Custom1

Wow, thanks a lot, I will learn from that. 

BA_Pete
Super User
Super User

Hi @DonPepe ,

 

Can you provide a copyable example of your source data please?

Make sure to remove any sensitive information before sharing.

 

Pete



Now accepting Kudos! If my post helped you, why not give it a thumbs-up?

Proud to be a Datanaut!




Helpful resources

Announcements
Join our Fabric User Panel

Join our Fabric User Panel

This is your chance to engage directly with the engineering team behind Fabric and Power BI. Share your experiences and shape the future.

June 2025 Power BI Update Carousel

Power BI Monthly Update - June 2025

Check out the June 2025 Power BI update to learn about new features.

June 2025 community update carousel

Fabric Community Update - June 2025

Find out what's new and trending in the Fabric community.