query如何导入文件名包括某个字符的数据源（优化）

假隐身

RT，假如文件夹路径为D:\测试，
文件下包括如下文件


如何导入开头为“销售”且创建日期为最新的表并展开，步骤要求简化，且尽量不产生新的的查询。

目前想到的是用导入文件夹并进行使用筛选功能，但是使用文件夹会产生很多冗杂的查询，且步骤十分复杂。


M公式（太多余且复杂）：
let
    源 = Folder.Files("D:\测试"),
    筛选的行 = Table.SelectRows(源, each Text.StartsWith([Name], "销售")),
    筛选的行1 = Table.SelectRows(筛选的行, let latest = List.Max(筛选的行[Date created]) in each [Date created] = latest),
    删除的其他列 = Table.SelectColumns(筛选的行1,{"Content"}),
    筛选的隐藏文件1 = Table.SelectRows(删除的其他列, each [Attributes]?[Hidden]? <> true),
    调用自定义函数1 = Table.AddColumn(筛选的隐藏文件1, "转换文件", each 转换文件([Content])),
    删除的其他列1 = Table.SelectColumns(调用自定义函数1, {"转换文件"}),
    扩展的表格列1 = Table.ExpandTableColumn(删除的其他列1, "转换文件", Table.ColumnNames(转换文件(示例文件))),
    更改的类型 = Table.TransformColumnTypes(扩展的表格列1,{{"Column1", type any}})
in
    更改的类型