Need to extract values from named cells (Get and Transform)

JEMagnussen 

As variant:

- create custom function which extract all named values from defined file:

(pFilePath as text) =>
let
    Source = Excel.Workbook(File.Contents(pFilePath), null, true),
    DefinedNamesOnly = Table.SelectRows(
        Source,
        each ([Kind] = "DefinedName")
    ),
    ExpandThem = Table.ExpandTableColumn(
        DefinedNamesOnly,
        "Data",
        {"Column1"}, {"Column1"}
    ),
    RemoveUnused = Table.SelectColumns(
        ExpandThem,
        {"Name", "Column1"}
    ),
    TransposeTable = Table.Transpose(RemoveUnused),
    PromotHeaders = Table.PromoteHeaders(
        TransposeTable,
        [PromoteAllScalars=true]
    ),
    ProperType = Table.TransformColumnTypes(
        PromotHeaders,
        {
            {"Beskrivelse", type text},
            {"EM", Int64.Type},
            {"Total", Int64.Type}
        }
    )
in
    ProperType

In another query use From folder connection, add column with full path\filename for each file, when another custom column with call of above function with previous value as parameter. Remove all other columns and expand this one.

I copy your source file and test with folder c:\test. Please check attached.